在VBc语言运算符与表达式中,表达式 8\3*61 Mod 5 的运算过程

VB 表达式5 MOD 13 的值是
***是 55除以13的余数
在VB中怎样写这个表达式?
Dim&x&As&Integerx&=&5&Mod&13Print&x&&'x=5
为您推荐:
其他类似问题
扫描下载二维码查看: 434|回复: 4
北航16春《VB语言程序设计》在线作业一.三.二***
TA的每日心情开心 10:52签到天数: 2 天[LV.1]初来乍到我玩的应用:
1.  假定有以下循环结构:
Do until 条件
则下列说法正确的是什么 。
A. 如果&条件&是一个为0的常数,则一次循环体也不执行
B. 如果&条件&是一个为0的常数,则至少执行一次循环体
C. 如果&条件&是一个不为0的常数,则至少执行一次循环体
D. 不论&条件&是否为&真&,至少要执行一次循环体
正确***游客,如果您要查看本帖隐藏内容请
2.  CommonDialog控件可以显示多少种对话框 。
正确***游客,如果您要查看本帖隐藏内容请
3.  为了给x、y、z三个变量赋初值为1,下面正确的赋值语句是( )
A. x=1:y=1:z=1
B. x=1,y=1,z=1
C. x=y=z=1
正确***游客,如果您要查看本帖隐藏内容请
4.  MSGBOX函数中有4个参数,其中必须写明的参数是(& & ) 。
A. 指定对话框中显示按钮的数目
B. 设置对话框标题
C. 提示信息
D. 所有参数都是可选的
正确***游客,如果您要查看本帖隐藏内容请
5.  货币型数据需(& && &)字节
正确***游客,如果您要查看本帖隐藏内容请
6.  若有一菜单项(名为MenuItem ),为了在运行时使该菜单项失效(变灰 ),应使用的语句是什么 。
A. MenuItem.Enabled = True
B. MenuItem.Visible = False
C. MenuItem.Checked = True
D. MenuItem.Enabled = False
正确***游客,如果您要查看本帖隐藏内容请
7.  Visual Basic根据计算机访问文件的方式将文件分成三类,其中不包括什么 。
A. 顺序文件
B. Unix文件
C. 二进制文件
D. 随机文件
正确***游客,如果您要查看本帖隐藏内容请
8.  VB表达式Cos(0 )+Abs(1 )+Int(Rnd(1 ) )的值是(&&)
正确***游客,如果您要查看本帖隐藏内容请
9.  如果没有在列表框中选择项目,且列表框的MultiSelect属性值为默认值(0~None ),则执行语名List1.RemoveItem List1.ListIndex的结果是(& & ) 。
A. 删除列表框的最后一项
B. 删除列表框的第一项
D. 删除列表框中的最后添加的一项
正确***游客,如果您要查看本帖隐藏内容请
10.  VB中窗体文件的扩展名是什么 。
正确***游客,如果您要查看本帖隐藏内容请
11.  表达式23/5.8、23\5.8、23Mod5.8的运算结果分别是( )
A. 3、3.9655、3
C. 4、4、5
正确***游客,如果您要查看本帖隐藏内容请
12.  函数过程(用Function定义 )与子过程(用Sub定义 )的最大区别是什么 。
A. 函数过程有返回值
B. 子过程有返回值
C. 函数过程可以带参数
D. 子过程可以带参数
正确***游客,如果您要查看本帖隐藏内容请
13.  条件1&x&2或10&x&15,在VB语言中应写成条件表达式( )
A. x&1 AND x&=2 OR a&=10 AND x&15
B. x&1 OR x&=2 OR a&=10 OR x&15
C. x&1 OR x&=2 AND a&=10 OR x&15
D. x&1 AND x&=2 AND a&=10 AND x&15
正确***游客,如果您要查看本帖隐藏内容请
14.  为了把窗体上的某个控件变为活动的,应执行的操作是(& & ) 。
A. 单击窗体的边框
B. 单击该控件的内部
C. 双击该控件
D. 双击窗体
正确***游客,如果您要查看本帖隐藏内容请
15.  决定一个窗体有无控制菜单的属性是什么 。
A. MinButtom
B. Caption
C. MaxButton
D. ControlBox
正确***游客,如果您要查看本帖隐藏内容请
16.  数学关系式3&x&10表示成正确的VB表达式为( )
A. 3&=x&10
B. 3&=x AND x&10
C. x&=3 OR x&10
D. 3&=x AND &10
正确***游客,如果您要查看本帖隐藏内容请
17.  确定一个控件在窗体上的位置的属性是(& & ) 。
A. Width或Height
B. Width 和Height
C. Top或Left
D. Top和Left
正确***游客,如果您要查看本帖隐藏内容请
18.  设a=″Visual Basic″,下面使b=″Basic″的语句是( )
A. b=Left(a,8,12 )
B. b=Mid(a,8,5 )
C. b=Right(a,5,5 )
D. b=Left(a,8,5 )
正确***游客,如果您要查看本帖隐藏内容请
19.  为了把焦点移到某个指定的控件,所使用的方法是(& &)
A. SetFocus
B. Visible
C. Refresh
D. GetFocus
正确***游客,如果您要查看本帖隐藏内容请
20.  若m,x,y,均为Integer型变量,则执行下面语句后m值是( )
& & m=1:X=2:Y=3
& & m=IIf(X>Y,X+Y,X-Y )
正确***游客,如果您要查看本帖隐藏内容请
21.  表示滚动条控件取值范围最大值的属性是(& & ) 。
B. LargeChange
D. Max-Min
正确***游客,如果您要查看本帖隐藏内容请
22.  将字符串“hello”添加到列表框的最后,可使用(& & )请语句 。
A. List1.AddItem“hello”,List1.ListCount-1
B. List1.AddItem“hello”,List1.ListCount
C. List1.AddItem“hello”,List1.ListIndex
D. List1.AddItem“hello”,List1.ListIndex-1
正确***游客,如果您要查看本帖隐藏内容请
23.  目录列表框的Path属性的作用是( )
A. 显示当前驱动器或指定驱动器上的路径
B. 显示当前驱动器或指定驱动器上的某目录下的文件名
C. 显示根目录下的文件名
D. 只显示当前路径下的文件
正确***游客,如果您要查看本帖隐藏内容请
24.  若要求从文本框中输入密码时在文本框中只显示&&*&&号,则应当在此文本框的属性窗口中设置&&(  &&).
A. Text&&属性值为&&*
B. Caption&&属性值为&&*
C. password&&属性值为空
D. Passwordchar&&属性值为&&*
正确***游客,如果您要查看本帖隐藏内容请
25.  设在菜单编辑器中定义了一个菜单项,名为menu1 。为了在运行时隐藏该菜单项,应使用的语句是什么 。
A. memu1.Enabled=True
B. memu1.Enabled=False
C. menu1.Visible=True
D. menu1.Visible=False
正确***游客,如果您要查看本帖隐藏内容请
1.  函数过程(用Function定义 )与子过程(用Sub定义 )的最大区别是什么 。
A. 函数过程有返回值
B. 子过程有返回值
C. 函数过程可以带参数
D. 子过程可以带参数
正确***游客,如果您要查看本帖隐藏内容请
2.  滚动条控件的Max属性所设置的是(& & ) 。
A. 滚动框处于最右位置时,一个滚动条位置的value属性最大设置值
B. 单击滚动条和滚动箭头之间的区域时,滚动条中滚动块的最大移动量
C. 单击滚动条的箭头区域时,滚动条中滚动块的最大移动量
D. 滚动条控件无该属性
正确***游客,如果您要查看本帖隐藏内容请
3.  滚动条控件的LargeChange属性所设置的是(& & ) 。
A. 单击滚动条和滚动箭头之间的区域时,滚动条控件value属性值的改变量
B. 滚动条中滚动块的最大移动位置
C. 滚动条中滚动块的最大移动范围
D. 滚动条控件无该属性
正确***游客,如果您要查看本帖隐藏内容请
4.  Sub过程与Function过程最根本的区别是什么 。
A. Sub过程可以使用Call语句或直接使用过程名调用,而Function过程不可以
B. Function过程可以有参数,Sub过程不可以
C. 两种过程参数的传递方式不同
D. Sub过程的过程名不能返回值,而Function过程能通过过程名返回值
正确***游客,如果您要查看本帖隐藏内容请
5.  假定已在窗体上画了多个控件,并有一个控件是活动的,为了在属性窗口中设置窗体的属性,预先应执行的操作是(& & ) 。
A. 单击窗体上没有控件的地方
B. 单击任一个控件
C. 不执行任何操作
D. 双击窗体的标题栏
正确***游客,如果您要查看本帖隐藏内容请
6.  表达式ASC(&F& )的类型是( )
A. 字符表达式
B. 关系表达式
C. 算术表达式
D. 逻辑表达式
正确***游客,如果您要查看本帖隐藏内容请
7.  VB中项目文件的扩展名是什么 。
正确***游客,如果您要查看本帖隐藏内容请
8.  如果要向工具箱中加入控件和部件,可以利用“工程”菜单中的什么命令 。
C. 工程属性
D. 添加窗体
正确***游客,如果您要查看本帖隐藏内容请
9.  VB认为下面(& && &)组变量是同一个变量 。
B. SUM和SUMMARY
C. ***ER和***ERAGE
D. A1和A_1
正确***游客,如果您要查看本帖隐藏内容请
10.  将字符串“hello”添加到列表框的最后,可使用(& & )请语句 。
A. List1.AddItem“hello”,List1.ListCount-1
B. List1.AddItem“hello”,List1.ListCount
C. List1.AddItem“hello”,List1.ListIndex
D. List1.AddItem“hello”,List1.ListIndex-1
正确***游客,如果您要查看本帖隐藏内容请
11.  OPTION&&EXPLICIT语句不可以放在(& & ) 。
A. 窗体模块的声明段中
B. 标准模块的声明段中
C. 类模块的声明段中
D. 任何事件过程中
正确***游客,如果您要查看本帖隐藏内容请
12.  定时器的Interval属性以(& & )为单位指定Timer事件之间的时间间隔 。
正确***游客,如果您要查看本帖隐藏内容请
13.  若有一菜单项(名为MenuItem ),为了在运行时使该菜单项失效(变灰 ),应使用的语句是什么 。
A. MenuItem.Enabled = True
B. MenuItem.Visible = False
C. MenuItem.Checked = True
D. MenuItem.Enabled = False
正确***游客,如果您要查看本帖隐藏内容请
14.  表示滚动条控件取值范围最大值的属性是(& & ) 。
B. LargeChange
D. Max-Min
正确***游客,如果您要查看本帖隐藏内容请
15.  可以同时删除字符串前导和尾部空白的函数是( )
正确***游客,如果您要查看本帖隐藏内容请
16.  VB中可以用类型说明符来标识变量的类型,其中用来表示货币型的是( )
正确***游客,如果您要查看本帖隐藏内容请
17.  如果X是一个正的实数,将千分位四舍五入,保留两位小数的表达式是(& & ) 。
A. 0.01*int(x+0.05 )
B. 0.01*int(100*(x+0.005 ) )
C. 0.01*int(100*(x+0.05 ) )
D. 0.01*int(x+0.005 )
正确***游客,如果您要查看本帖隐藏内容请
18.  将任意一个正的两数N的个位数与十位数对换的表达式为(& & ) 。
A. (N-INT(N/10 )*10 )*10+INT(N/10 )
B. N- INT(N/10 )*10 )*10+INT(N )/10
C. INT(N/10 )+(N-INT(N/10 )
D. N- INT(N/10 )*10*10+INT(N/10 )
正确***游客,如果您要查看本帖隐藏内容请
19.  函数String(n,&str& )的功能是(& & ) 。
A. 把数值型数据转换为字符串
B. 返回由n个字符组成的字符串
C. 从字符串中取出n个字符
D. 从字符串中第n个字符的位置开始取子字符串
正确***游客,如果您要查看本帖隐藏内容请
20.  如何使图象(Image )控件中的图象自动适宜控件的大小 。
A. 将控件的AutoSize属性设为True
B. 将控件的AutoSize属性设为False
C. 将控件的Stretch属性设为True
D. 将控件的Stretch属性设为false
正确***游客,如果您要查看本帖隐藏内容请
21.  如果变量a=2,b=3,c=4,d=5,表达式NOT a&b AND NOT d&&c的值是( )
正确***游客,如果您要查看本帖隐藏内容请
22.  货币型数据需(& && &)字节
正确***游客,如果您要查看本帖隐藏内容请
23.  常用控件的Style属性值是(& & ) 。
A. 字符常量
B. 逻辑常量
C. 数值常量
D. 日期常量
正确***游客,如果您要查看本帖隐藏内容请
24.  通过改变选项按钮(OptionButton )控件的什么属性值,可以改变按钮的选取状态 。
C. Appearance
D. Caption
正确***游客,如果您要查看本帖隐藏内容请
25.  为了把一个记录型变量的内容写入文件中指定的位置,所使用的语句的格式为什么 。
A. Get文件号,记录号,变量名
B. Get文件号,变量名,记录号
C. Put文件号,变量名,记录号
D. Put文件号,记录号,变量名
正确***游客,如果您要查看本帖隐藏内容请
1.  将字符串“hello”添加到列表框的最后,可使用(& & )请语句 。
A. List1.AddItem“hello”,List1.ListCount-1
B. List1.AddItem“hello”,List1.ListCount
C. List1.AddItem“hello”,List1.ListIndex
D. List1.AddItem“hello”,List1.ListIndex-1
正确***游客,如果您要查看本帖隐藏内容请
2.  如果变量a=2,b=3,c=4,d=5,表达式NOT a&b AND NOT d&&c的值是( )
正确***游客,如果您要查看本帖隐藏内容请
3.  确定一个控件在窗体上的位置的属性是(& & ) 。
A. Width或Height
B. Width 和Height
C. Top或Left
D. Top和Left
正确***游客,如果您要查看本帖隐藏内容请
4.  假定已在窗体上画了多个控件,并有一个控件是活动的,为了在属性窗口中设置窗体的属性,预先应执行的操作是(& & ) 。
A. 单击窗体上没有控件的地方
B. 单击任一个控件
C. 不执行任何操作
D. 双击窗体的标题栏
正确***游客,如果您要查看本帖隐藏内容请
5.  Sub过程与Function过程最根本的区别是什么 。
A. Sub过程可以使用Call语句或直接使用过程名调用,而Function过程不可以
B. Function过程可以有参数,Sub过程不可以
C. 两种过程参数的传递方式不同
D. Sub过程的过程名不能返回值,而Function过程能通过过程名返回值
正确***游客,如果您要查看本帖隐藏内容请
6.  将一个窗体设置为MDI子窗体的方法是什么 。
A. 将窗体的名称改为MDI
B. 将窗体的MDIChild属性设为True
C. 将窗体的MDIChild属性设为False
D. 将窗体的Enabled属性设为False
正确***游客,如果您要查看本帖隐藏内容请
7.  表达式INT(8*SQR(36 )*10^(-2 )*10+0.5 )/10的值是(& & ) 。
正确***游客,如果您要查看本帖隐藏内容请
8.  为了确定一个窗体或控件的大小的属性是(& & ) 。
A. Width或Height
B. Width 和Height
C. Top或Left
D. Top和Left
正确***游客,如果您要查看本帖隐藏内容请
9.  表达式X+1&X是
A. 算术表达式
B. 非法表达式
C. 字符表达式
D. 关系表达式
正确***游客,如果您要查看本帖隐藏内容请
10.  可以用作其它控件容器的控件有(& & )
A. 窗体控件,列表控件,图像控件
B. 窗体控件,文本框控件,框架控件
C. 窗体控件,框架控件,图片框控件
D. 窗体控件,标签控件,图片控件
正确***游客,如果您要查看本帖隐藏内容请
11.  假定有以下循环结构:
Do until 条件
则下列说法正确的是什么 。
A. 如果&条件&是一个为0的常数,则一次循环体也不执行
B. 如果&条件&是一个为0的常数,则至少执行一次循环体
C. 如果&条件&是一个不为0的常数,则至少执行一次循环体
D. 不论&条件&是否为&真&,至少要执行一次循环体
正确***游客,如果您要查看本帖隐藏内容请
12.  将任意一个正的两数N的个位数与十位数对换的表达式为(& & ) 。
A. (N-INT(N/10 )*10 )*10+INT(N/10 )
B. N- INT(N/10 )*10 )*10+INT(N )/10
C. INT(N/10 )+(N-INT(N/10 )
D. N- INT(N/10 )*10*10+INT(N/10 )
正确***游客,如果您要查看本帖隐藏内容请
13.  VB的日期型常量的定界符是( )
正确***游客,如果您要查看本帖隐藏内容请
14.  为了把焦点移到某个指定的控件,所使用的方法是(& &)
A. SetFocus
B. Visible
C. Refresh
D. GetFocus
正确***游客,如果您要查看本帖隐藏内容请
15.  设置一个单选按钮(OptionButton )所代表选项的选中状态,应当在属性窗口中改变的属性是(& & ) 。
A. Caption
正确***游客,如果您要查看本帖隐藏内容请
16.  函数String(n,&str& )的功能是(& & ) 。
A. 把数值型数据转换为字符串
B. 返回由n个字符组成的字符串
C. 从字符串中取出n个字符
D. 从字符串中第n个字符的位置开始取子字符串
正确***游客,如果您要查看本帖隐藏内容请
17.  ^、/、Mod、*等4个算术运算符中,优先级最低的是(& & )
正确***游客,如果您要查看本帖隐藏内容请
18.  Visual Basic根据计算机访问文件的方式将文件分成三类,其中不包括什么 。
A. 顺序文件
B. Unix文件
C. 二进制文件
D. 随机文件
正确***游客,如果您要查看本帖隐藏内容请
19.  假定在图片框Picture1中装入一个图形,为了清除该图形(注意,清除图形,而不是删除图片框 ),应采用的正确的方法是(&&)
A. 选择图片框,然后按Del键
B. 执行语句Picture1=LoadPicture( & &&&)
C. 执行语句Picture1.parent=& &
D. 选择图片框,在属性窗口中选择Picture属性,然后按回车键
正确***游客,如果您要查看本帖隐藏内容请
20.  INT(100*RND(1 ) )产生的随机整数的闭区间是(& & ) 。
A. [0,99]
B. [1,100]
C. [0,100]
D. [1,99]
正确***游客,如果您要查看本帖隐藏内容请
21.  设在菜单编辑器中定义了一个菜单项,名为menu1 。为了在运行时隐藏该菜单项,应使用的语句是什么 。
A. memu1.Enabled=True
B. memu1.Enabled=False
C. menu1.Visible=True
D. menu1.Visible=False
正确***游客,如果您要查看本帖隐藏内容请
22.  若要将某命令按钮设置为默认命令按钮 。则应设置为 True 的属性是 (  & &)&&。
C. Default
D. Enabled
正确***游客,如果您要查看本帖隐藏内容请
23.  Visual Basic 是一种面向对象的程序设计语言,构成对象的三要素是 (&& & &)&&。
A. 属性、事件、方法
B. 控件、属性、事件
C. 窗体、控件、过程
D. 窗体、控件、模块
正确***游客,如果您要查看本帖隐藏内容请
24.  不能正确表示条件“两个整型变量A和B之一为0,但不能同时为0”的布尔表达式是(& & ) 。
A. A*B=0& &AND&&A&&B
B. (A=0&&OR&&B=0 )&&AND& &A&&B
C. A=0&&AND&&B&&0&&OR&&A&&0& &AND B=0
D. A*B=0&&AND (A=0&&OR&&B=0 )
正确***游客,如果您要查看本帖隐藏内容请
25.  为了给x、y、z三个变量赋初值为1,下面正确的赋值语句是( )
A. x=1:y=1:z=1
B. x=1,y=1,z=1
C. x=y=z=1
正确***游客,如果您要查看本帖隐藏内容请
该用户从未签到
我想知道***
该用户从未签到
************************谢谢谢谢谢谢谢谢
该用户从未签到
***是什么呢
工作时间:8:30-24:00
双休日正常上班
扫一扫加官方微信
Powered byvb练习题二
vb练习题二
相关热词搜索:
篇一:VB练习题2 一、概念填空题 1.在Visaul Basic中,属性窗口分为四个部分,这四个部分分别是(
)、属性显示方式、属性列表和对当前属性的简单解释。 2.组合框有三种不同的风格,它们分别是:()、()和( )。 3. 时钟控件是有规律地以一定的( )激发计时器事件,而执行相应的代码程序。 4.A = 8,B = 3,C = 5,则表达式A MOD 3 + B^3 / C \ 5的值为(
)。 5.声明一个双精度变量Num5,的声明语句是 () 。 6.有一文本框Text1,为了使该文本框在运行时获取焦点,应执行的语句是 ()。 7.在使用动态数组时,如要改变数组的大小而又不丢失数组中的数据,应使用(
)关键字。 8.Visual Basic逻辑数据类型只有 True 与 False 两个值。当逻辑数据转换成整型数据时,True 转换为(
),False转换为()。 9.在Visaul Basic 中依据变量的作用范围将VB变量的作用范围分为三类,它们是:()变量、(
)变量和()变量。 10.字符串常量是由任何ASCII字符组成,在程序代码中,它必须由(
)括起来。 11.如果有三个单选按钮直接画在窗体上,另有四个单选按钮画在框架中,则运行时,可以同时选中(
)个单选按钮。 二、概念选择题 1.不能触发滚动条Change事件的操作是(
)。 A) 拖动滚动条的滑块
B) 单击两端箭头 C) 单击滚动条的滑块 D) 单击滚动条的空白处 2.已知变量x 、y为整数型,且x=4 , y=12 ,s为字符型 ,且s=“a”,Leble1为标签控件,Leble1的Caption属性值为Label1,下列合法的赋值语句是( )。 A) X= Leble1.Caption B) Leble1.Caption=Str(X) C) X*3=Y D) Y=X*S 3.下列可以将变量A、B的值互换的语句是()。 A) A=B : B=AB) C=B : B=A :A=C C) A=C : C=B : B=AD) A=(A+B)/2 :B=(A-B)/2 4.下列叙述中错误的是()。 A) VB是采用了事件驱动编程机制。 B) VB是面向过程的程序设计语言。 C) VB是可视化程序设计语言。 D) VB是面向对象的程序设计语言。 5.要声明一个长度为256个字符的定长字符串变量Str,正确的是(
)。 A) Dim Str as string 256B) Dim Str as string(256) C) Dim Str as string [256] D) Dim Str as string*256 6.下列关系运算结果为“True”的是()。A) &1&+2=&12&B) &1&+&2&=&3& C) &1& & 2=&12& D) &1& & &2&=&3& 7.设a=2,b=3,c=4,d=5,下列表达式的a&b And c&=d Or 2*a&c值是(
)。 A) True
B) False C) -1 D) 1 8.确定复选框是否选中,可访问的属性是( )。 A) Value B) Checked C) Selected
D) Caption 9.变量S#,TT%,MS$是以下何种类型(
)的变量。 A) 单精度
字符型 B) 双精度
字符型 C) 整型
单精度 D) 字符型
单精度 双精度 10.下列不属于图形控件方法的是(
)。 A) Picture
Print C) Move
Cls 11.在程序代码中清除图片框Picture1 中的图形的正确语句是( ) A) Picture1.Picture=″″ B) Picture1.Picture=Loadpicture(″″) C) Picture1.Image=″″ D) Picture1.Picture=Null 12.设a=9,则执行 x=IIF(a&15,18,23)后,x 的值为()。 A) 9B) 15 C) 18
D) 23 13.数学表达式Sin25写成VB表达式是()。 A) Sin 25B) Sin(25) C) Sin 25° D) Sin(25*3.14/180) 14.下列逻辑运算结果为“True”的是()。 A) Flase or Not True
B) Flase And Not True C) True or Not TrueD) True And Not True 15.日期数据应该在数据的(
)括起来。 A) 前后各用一个双引号B) 前后各用一个单引号 C) 前后各用一个圆括号D) 前后各用一个“#”号 16. 下列运算结果中,值最大的是( )。 A) 3\4B) 3/4C) 4 mod 3
D) 3 mod 4 17.下列对过程调用时参数传递的不正确说法是( )。 A) 参数传递有传值和传址两种 B) 传址是实参的值随着形参的改变而改变 C) 传值是实参的值不会随着形参的改变而改变 。D) 传址是形参的变化不会影响到实参 18.用Dim b(-2 to 4) As String语句所定义的数组的元素个数是( )个。 A) 2 B) 4 C) 6
D) 7 19.下列关于For ?next 语句的说法正确的是(
)。 A) 循环变量、初值、终值和步长都必须为数值型 。 B) Step后的步长只为正数。 C) 初值必须小于终值 。 D) 初值必须大于终值。 20.假设Select
Case X (X字符型变量),下列错误的Case表达式是( )。 A)
Is =“G”B)
“A”,“B”,“C”,“T” C) “a” To “z”
D)X = “G”
三、阅读程序写结果 1.Dim k As Integer n = 12 m = 2 k =4 Do While k &= n m = m * 2 k = k + 2 Loop Print
2. A = 100 B = 50 C = 30 IF A & B AND B & C THEN B = C IF B = C OR A & C THEN A = A-100 PRINT A,B,C
3.Dim M(10),N(10) I = 3 For j = 1 To 5 M(j) = j N(I) = 2 + I * j Next j Print N(I); M(I)
程序运行后,单击命令按钮,输出结果为。Sub S(x As Single, ByVal y As Single) t = x x = t * y y = t / y End Sub Private Sub Command1_Click () Dim a As Single,b As Single a = 8 b = 9 S a , b P b End Sub 四、程序填空 1.以下程序用来产生80个小于50~165之间的随机整数,将这些数中能被3和5除余2的数在窗体上显示。 Private Sub Command1_Click() Randomize For I = 1 To 80
X =()If ()
Then Print X End
If Next I End Sub
2. 该程序是单击命令按钮,用InputBox函数输入二个整数后,调用自定义函数,求组合Cm n 即m! / (n!(m - n)!),在图形框中输出结果。 Private Sub Command1_Click() Dim M%, N%,S% M = InputBox(“输入M”) N = InputBox(“输入N”) S=( ) Picture1.Print “S=”;S End Sub Function Zh( ) As Long P = 1 For H = 1 To X P = P * HNext H Zh= P End Function 3.该程序是输入任意三角形的三个边,调用子过程求出三角形的面积。 Private Sub Form_Click() Dim A%, B%, C%, AREA! A = InputBox(&输入三角形的第一个边A&) B = InputBox(&输入三角形的第二个边B&) C = InputBox(&输入三角形的第三个边C&) Print A, B, C ( ) Print AREA End Sub Sub Triangle(
) P = (X + Y + Z) / 2 S = Sqr(P * (P - X) * (P - Y) * (P - Z)) End Sub 五、程序设计 数组C是一维动态定长字符数组,每个字符串长度最多9个字符,数组元素个数M由文本框Text1输入的值确定,当在文本框中输入数组元素个数失去焦点后,用InputBox函数输入M个字符串赋予C数组中;单击图形框(Picture1)在该图形框输出这些字符串的升序;单击“清空”命令按钮(Command1),清除文本框、图形框中的内容;单击“退出”命令按钮(Command2),结束程序运行。 要求: (1)设计(画出)界面 (2)给出对象(控件)属性表 (3)编写Text1失去焦点事件、Picture1单击事件、Command1单击事件和Command2单击事件的事件过程代码。篇二:VB练习题二 VB练习题二 一、选择题: 1、以下4种描述中,错误的是: A 常量是在程序执行期间其值不会发生改变 B 根据数据类型不同,常量可分为字符型常量、数值常量、日期/时间型常量和布尔型常量 C 符号常量是用一个标识符来代表一个常数,好像是为常数取一个名字,但仍保持常数的性质D 符号常量的使用和变量的使用没有差别 2、下面合法的常量是: A
1/2B ?acd? C
False 3、VB中可以用类型符来标识变量的类型,其中表示货币型的是:
D $ 4、下面()
是不合法的整常数。 A
%0100 C&H100 &o100 5、以下关键字中,不能定义变量的是: A
Declare BDim
PublicD Private 6、表达式16/4- 5*8/4
5\2的值为: A 14B4 C 20 D
2 7、VB日期型常量的定界符是 : A# #B
[ ] 8、数学关系公式3≤x&10表示成正确的VB表达式为: A 3&=X&10 B 3&=x and x&10C x&=3 OR x&10D3&=x and &10 9、下面正确的赋值语句是: Ax+y=30 B
x=3Y 10、\,/,MOD,*四个算术运算符中,优先级别最低的是:
A\ B/ CMod
* 11、表达式ASC(“F)”的类型是: A
字符表达式
B 关系表达式 C 算术表达式 D 逻辑表达式 12、下面语句中有非法调用的是: A
x=sgn(-1) B x=fix(-1)
x=sqr(-1) D
x$=chr$(65) 13、表达式23/5.8、23\5.8、23 mod 5.8的运算结果分别是: A
4、4、5 D 3. 14、如果变量a=2,b=”abc”,c=”acd”,d=5,则表达式a&b and b&&c的值为: ATrue
False CYes
DNo 15、下面不正确的赋值语句是: A x=30-y B
y=x\3 16、为了给X,Y,Z三个变量赋初值1,下面正确的赋值语句是: AX=1:Y=1:Z=1 B X=1,Y=1,Z=1C X=Y=Z=1D
XYZ=1 17、以下4类运算符,优先级最低的是: A算术运算符 B
字符运算符C
关系运算符D
逻辑运算符 18、如果在立即窗口中依次执行下列命令: a=8 b=9 print a&b则输出的结果是: A1 B0
False DTrue 19、已知a=””,则表达式left(a,4)+Mid(a,4,2)的值是: A123456
B “123445”C
1279 20、在VB中Y1+Z2=a*sin(b*x+c)+k表达式的类型是: A算术表达式B
关系表达式C
逻辑表达式D
字符表达式 21、 下列表达式的值为真的是: A
“A”&”a” B “9”&”a”C
“That”&”Thank”
D 12&12.1 22、在下列算术运算符中,运算等级最高的是: A
取负(-) B 乘、除(*,/)C 取模(MOD) D 加、减(+、-) 23、如果变量a=2,b=3,c=4,d=5,表达式not a&b and not d&&c的值是: A
1 D0 24、在一个有(1)逻辑运算
(2)算术运算(3)关系运算混合在一起的表达式(无括号)中,其运算顺序为: A1,2,3 B
3,2,1 C 2,3,1 D
2,1,3 25、表达式A%+B&+C!-D#的结果为: A 整型 B长整型C 单精度型D
26、下列符号中,可以用作VB变量名的是: A
B 3sum C sum3D Len 27、条件:1&X&=2 或10&=X&15,在VB语言中应写成条件表达式: A
X&1 and X&=2 or X&=10 and x&15B x&1 OR x&=2 OR x&=10 OR x&15 C X&1 OR x&=2
AND x&=10 OR x&15 D x&1 AND x&=2 AND x&=10 AND x&15 28、通过(
)窗口可以在设计时直观的调整窗体在屏幕上的位置。 A.代码窗口 B.窗体布局窗口 C.窗体设计窗口 D.属性窗口 29、设有如下的记录类型: Tyep Student Number as String
Name as string
Age as integer End type 则正确引用该记录类型变量的代码是:Astudent.name=“张红” B
Dim s as student s.name=”张红”
C Dim s as Type Student D
Dim s as Type s.name=“张红” s.name=“张红” 30、表达式Not(a+b=c-d)是: A 逻辑表达式 B
字符表达式C 算术表达式D 关系表达式 31、“-32768”的数据类型是: A 、整型常量B 浮点型常量C 符号常量D 字符串型常量 32、在下列4个表达式中,非法的表达式形式是: A
A+B=C B 0=1C
“ABC”+112 D
1/2=0.5 33、设X=5,表达式X.=10 or x&=20的值是: A
D表达式非法 34、下列数据类型不可能占8个字节的是: A
Dinteger 35、从键盘上输入两个字符串,分别保存在变量str1、str2中。确定第二个字符串在第一个字符 串中起始位置的函数是: A. Left
D. Instr 36、逻辑表达式Not “a”&”b”
and 9&3 or 9&3的值为: A
表达式有错D
条件不足 37、在窗体模块的声明段中声明变量时,不能使用的关键字是: A
Dim DStatic 38、选拔身高T超过1.7米且体重W小于62.5公斤的人,表示该条件的表达式为: A
AND W&=62.5 B
or W&62.5 C T&1.7 and w&62.5
D T&=1.7 or W&=62.5 39、在过程内部定义的局部变量,仅在声明它的( )中有效。 A
对象 40、假设A=“Good Morning。”,B=“Afternoon,Boys.”,下列表达式中结果是“Good Boys。”的是: A
Left(A,5)+Right(B,5) B
Right(A,5)+Left(B,5) C
Mid(A,1,5)+Mid(B,1,5)
D Right(A,5)+Right(B,5) 41、下列关于变体类型的描述,其中正确的是: A
变体是一种没有类型的数据 B
变体的空值就表示该变体的值为0 C
一个变量没有定义就赋值,该变量即为变体类型 D 变体是赋给变量某一种类型数据后,就不能再赋给它另一类型的数值 42、执行PRINT 18/2*3,-3^2命令后,输出结果为: A
-9 27 43、执行PRINT 9.4、3.7,9.4 MOD 3.7命令后,输出结果为: A2
D12 44、运行以下程序段后,输出结果为: X%=1/4 Y%=11/4 Print x%;Y% A0.250.75 B
1 3 45、窗体里有两个对象,分别是图片框Picture1和标签Label1,下面关于Print方法的使用中,错误的一条是: A
Picture1.print 147
print 147 C
Printer.print
Label1.print 147 46、下面的()语句可以实现:先在窗体上输出大写字母A,然后在同一行的第10列输出小写字母b. A
print “A”;Tab(9);“b”B
print “A”;Tab(10);“b” C
print “A”;space(10);“b” D print “A”;Tab(8);“b” 47、阅读下面的程序段: n1=inputBox(“请输入第一个数:”) n2=inputBox(“请输入第二个数:”) print n1+n2 当输入分别为111和222时,程序输出为: A111222
程序出错 48、语句Print Format (“HELLO”,“&”)的输出结果是:
HeDhe 49、设a=2;b=0,则语句print (a=2) and (b=-2)的输出结果是: ATrue B
结果不确定 C
False 50、以下程序段运行后,输出字符的排列顺序是: For I=1 to 6 If
I mod 2=0 thenPrint “#”; Elseprint “*”;
endif Next I A#*#*#
*#*#*# 51、用MsgBox函数显示的对话框,以下叙述正确的是: A
该对话框有一个“确定”按钮B 该对话框有“是”,“否”两个按钮 C 该对话框有“是”,“否”,“取消”三个按钮 D 该对话框通过选择参数可以得到以上不同的按钮组合 52、与语句Dim abc%作用相同的语句是: A
Dim abc as integer B
dim abc as strigD dim abc as date 53、设a=1,b=2,c=3,d=4,则表达式IIF(a&b,c,d)的结果为: A4 B3
C2 D1 54、Rnd函数不可能为下列( )的值。 A0 B1
D0.0005 55、表达式int(198.555*100+0.5)/100的值为:
200 56、print Month(#5/30/2005#)语句显示的结果是: A3
D6 57、若Y=“welcome!”,则表达式Left(Y,Len(Y)-1)的值是: A“welcome!”
“welcome”D
“” 58、变量string$=“Hello , world!”,函数Trim(string)的结果是:
“Hello,world!”B “Hello, world!” C
“Hello,world!” D “Hello,world!” 59、下列表达式中,表达式( )的运算结果与其它3个不同。 A
int(-3.5)-1.5
B int(-4.5)+0.5C
–Abs(-4.5)D
Fix(-4.5)=0.5 60、表达式sgn(-2)-3.5的值是: A
D-4.5 61、函数Mid(“”,3,4)的值是: A“3456”B “456”C
456 62、要使变量X赋值为1~100间(含1,不含100)的一个随机数,正确的语句是:
x=int(100*rnd)B
x=int(101*Rnd) C
x=1+int(100*Rnd)D x=1+int(99*Rnd) 63、VB表达式COS(0)+ABS(1)+INT(RND)的值是: A
1B-1 C0D2 64、可实现从字符串任意位置截取字符的函数是: A
RIGHT() 65、实现将小写字母转换成大写字母的函数是: ASTR() B
UPPER() C
UCASE() D
LCASE()66、能实现数值格式化输出的函数是: ASTR()BMID()
CCHR() DFORMAT() 67、设A=6,则执行X=IIF(A&5,-1,0)后,X的值为: A 5B 6
D-1 68、表达式INT(5*RND+1)*INT(5*RND-1)值的范围是:A
[-1,15]C [-4,15]
[-5,15] 69、当函数MsgBox返回值为1,对应的符号常量是vbOK,那么此时表示用户做的操作是:
A 用户单击了对话框中的“确定”按钮B 用户单击了对话框中的“取消”按钮 C 用户单击了对话框中的“是”按钮
D 用户单击了对话框中的“否”按钮 70、函数INT(RND*5)+1产生的随机整数的范围是: A
[0,6] B
[0,5] D[1,5] 71、在VB中,InputBox函数的默认返回值类型为字符串,用InputBox函数输入数值型数据时, 下列操作中可以有效防止程序出错的操作是:
在函数InputBox前面使用Val函数进行类型转换B
在函数InputBox前面使用Strl函数进行类型转换 C
在函数InputBox前面使用Value函数进行类型转换 D
在函数InputBox前面使用String函数进行类型转换 72、已知A=“”,则表达式Righ(a,4)+Mid(a,3,2)的值是:
A“123445” B “567834”C
123445 D 、表达式Len(“123程序设计ABC”)的值是:
D17 74、如果X是一个正实数,对X的第3位小数四舍五入的表达式是:
0.01*int(X+0.005) B
0.01*int(100*(X+0.005)) C
0.01*int(100*(x+0.05))
0.01*int(x+0.05) 75、以下程序执行后,输出的结果是: m$=”123” n$=”456” k$=LCASE$(m$) j$=UCASE$(n$) PRINT K$,J$ A123456 B
D 3336 76、MsgBox函数的返回值的类型是: A
日期型 77、A=5,B=8,则(B-A)*RND+A的结果是介于()之间的数。 A 5~8 B
C 3~5 D0~3 78、设a=“Visual Basic”,下面使b=“Basic”的语句是( ) A. b=Left(a,8,12)
B. b=Mid(a,8,5)C. b=Rigth(a,5,5)
D. b=Left(a,8,5) 二、填空题: 1、控件的和和属性表示控件的位置。 2、对于文本框控件来说,禁止编辑其内容应将其属性设置为应将其
属性设置为;如果想输入多行文字应将其
属性设置为
;若想在输入时在其中显示为*应将其 属性设置为
;如果文本框中内容为:“计算机编程设计语言”,想选中其中的“编程设计”4个字,应将其
属性,分别设置为和。 3、VB中设置一个对象属性的方法有和两种,设置对象属性的语句格式为 ,调用对象方法的一般格式为 。 4、VB的对象中可以起到分组作用的控件有和 5、在VB中,对象的三要素分别是_______、_______和_______。 6、VB中工程文件的扩展名为_______;窗体文件的扩展名为_______。 7、在VB中整型数据占________个字节的内存空间。双精度浮点型数据占________个字节的内存空间。 8、若用户单击了窗体Form1,则此时将被执行的事件应为:___________________________。 9、假定一个文本框的Name属性为Text1,为了在该文本框中显示“Hello!”,所使用的语句为____________________________。 10、控件和窗体的Name属性只能在 _______窗口中设置,不能在 _________ 代码窗口中设置。 11、为了使标签能自动调整大小以显示全部文本内容,应把标签的__________ 属性设置为True。 12、为了使一个标签透明且没有边框,必须把它的BorderStyle属性设置为____________,并把BackStyle属性设置为___________。 13、编写窗体的单击事件代码,求一任意三角形的面积,三角形的三条边a、b、c通过Inputbox函数输入,计算的结果存入S变量中,并以消息框的形式输出。 提示:任意三角形的面积公式 1~5 DDCBA6~10 BABCC
11~15 CBAB
16~20 ADCBB 21~25 CABCD
26~30 CABBA
31~35 DCADD 36~40 ADCBA 41~45 CCACD
46~50 BABDD 51~55 DABBC 56~60 CCCAD 61~65 ADDBC 66~70 DDDAD 71~75 ABABA 76~78 A AA篇三:VB二级考试习题及***2 练习3 一、单选题(30分,每小题1分) ? 一个完整计算机系统应包括___(1)____。 (A) 主机、键盘、和显示器(B)硬件系统和软件系统 (C) 主机和其他外部设备
(D) 系统软件和软件 ? 打印机属于计算机部件中的___(2)___。 (A) 输出设备(B) 输入设备(C) 存储设备(D) 缓冲设备 ? 下列表示存储容量的数据中,____(3)____是最大的。 (A)20480 KB (B) 1.44 MB
(C) 1 GB (D)4865723 Byte ? 在计算机内部能够直接执行的程序语言是___(4)____。 (A)数据库语言
(B)高级语言
(C)机器语言
(D)汇编语言 ? 下列叙述正确的是___(5)____。 (A)程序设计就是编制程序 (B)程序的测试必须由程序员自己去完成 (C)程序经调试改错后还应进行再测试(D) 程序经调试改错后不必进行再测试 ? 以下叙述中错误的是___(6)___。 (A)Visual Basic 是事件驱动型可视化编程工具 (B)Visual Basic应用程序不具有明显的开始和结束语句 (C)Visual Basic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性 (D)Visual Basic中控件的某些属性只能在运行时设置 ? 以下不属于VB工作模式的是___(7)___模式。 (A) 编译 (B) 设计 (C) 运行 (D) 中断 ? 以下语句的输出结果是___(8)___ 。 Print Format $(32548.5,“000,000.00”) (A) 32548.5 (B) 32,548.5 (C) 032,548.50 (D) 32,548.50 ? 若要使某可见控件获得焦点,则可使用___(9)_____方法来实现。 (A) Refresh(B) SetFocus
(C) Value(D) GotFocus ? 在下列说法中,正确的是___(10)___。 (A) 通过适当的设置,可以在程序运行期间,让时钟控件显示在窗体上 (B) 在列表框中不能进行多项选择 (C) VB系统不能在列表框中自动实现将项目按字母顺序从大到小排列 (D) 复选框的Value属性值为布尔型 ? 执行以下程序段,输出的结果为___(11)___。 a$=&abbacddcba& For i=6 To 2 Step -2 x=Mid(a,i,i):
y=Left(a,i)z=Right(a,i):
z=UCase(X & Y & z) Next i Print z (A) ABA (B) BBABBA (C) ABBABA (D) AABAAB ? 控件在窗体上的位置是由___(12)___属性确定的。 (A) Width和Height
(B) Top和Left
(C) Width和Left
(D) Top和Width
? 关于Name属性,以下叙述中___(13)___是正确的。 (A) 窗体的Name属性指定窗体的名称,用于标识一个窗体。 (B) 窗体的Name属性用于设置显示在窗体标题栏的文本。 (C) 可以通过代码在程序运行中改变某个对象的Name属性值。 (D) 对象的Name属性值可以设置为空。 ? 下列名称中___(14)___可以作为VB的变量名。 (A) mod(B) m-d(C) tempVal(D) left ? 要求出变量x和y中较大的一个并保存在变量Max中,下面的程序段中___(15)___ 是不正确的。 (A) Max = IIf(x & y, x, y) (B) If x & y Then Max = x Else Max = y (C) Max = x (D) If y & x Then Max = y If y &= x Then Max = y Max = x ? 执行以下语句后,a的值为___(16)___ Dim a As Integer a = 1 Do Until a = 100 a = a + 2 Loop (A) 102 (B)100 (C)溢出 (D)101 ? 对于语句If a = b Then c = d 的语法分析,___(17)___是正确的。 (A) a=b 和 c=d都是赋值语句 (B) a=b是关系表达式,c=d是赋值语句 (C) a=b 和 c=d都是关系表达式
(D) a=b是赋值语句,c=d是关系表达式 ? 运行下列程序段,单击两次命令按钮,则第二次单击时窗体中显示的结果是__(18)__。 Private Sub Command1_Click() Dim a As Integer Static b As Integer a = a + 5:
b = b + 5 Print a, b End Sub(A) 510
(D) 00 ? 在系统默认的情况下,Dim a(3, 4, 2 To 5)
定义的数组共有___(19)___个元素。 (A) 36(B) 48(C) 60(D) 80 ? 下面的子过程定义语句中没有语法和逻辑错误的是___(20)___。 (A) Sub S1(ByVal n%())
(B) Sub S1(n As Integer) As Integer (C) Function S1(ByVal n As Integer)
(D) Function S1%(ByVal S1 As Integer) ? 执行了下面程序后,组合框中数据项的值是___(21)___ 。 Private Sub Form_Click() For i=1 to 6 Combo1.AddItem i Next i For i= 1 to 3 Combo1.RemoveItem i Next i End Sub (A)1 5 6(B)1 3 5 (C)4 5 6(D)2 4 6 ? 设窗体上有一个列表框控件List1,且其中含有若干列表项。则以下能表示当前被选 中的列表项内容的是__(22)___. (A)List1.List B)List1.ListIndex (C)List1.Index (D)List1. Text ? 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编 写如下事件过程: Private Sub Command1_Click() n = Val(Text1.Text) For i = 2 To n For j = 2 To sqr(i) If i Mod j = 0 Then Exit For Next j If j & Sqr(i) Then Print i Next i End Sub 该事件过程的功能是__(23)__ (A) 输出n以内的奇数
(B) 输出n以内的偶数 (C) 输出n以内的素数
(D) 输出n以内能被j整除的数 ? 如果要在菜单中添加一个分隔线,则应将其标题属性设置为___(24)_____。 (A)= (B)*
(C)& (D)-? 以下关于文件的叙述中正确的是__(25)__。 (A) 一个记录中所包含的各元素的数据类型都是相同的 (B) 随机文件中每个记录的长度是固定的 (C) Open命令的作用是打开一个已经存在的文件 (D) 使用Input # 语句可以从随时机文件中读取数据 ? 以下定义数组或给数组元素赋值的语句中,正确的是__(26)__。 (A) Dim a As Variant
(B) Dim a(10) As Integer a=Array(1,2,3,4,5) a=Array(1,2,3,4,5) (C) Dim a%(10)
(D) Dim a(3),b(3) As Integer a(1)=&ABCDE& a(0)=0 : a(1)=1 : a(2)=2 : b=a ? 窗体中有一个命令按钮,编写如下程序,程序运行后,输出结果为___(27)___。 Private Sub test(p,m,n) p=p+1: m=m+1: n=n+1 Print “Sub:”; n End Sub
Private Sub Command1_Click() a1=1: b1=2: c1=3 Call test(a1,b1+3,(c1)) Print “Main:”; a1; b1; c1 End Sub (A) Sub: 2 6
4 (B) Sub: 2
4 (C) Sub: 2 6
4 (D) Sub: 2
4 Main: 2 6
4 Main: 1 2
3 ? 以下语句用于打开一个顺序文件Open&C:\MyFile.txt& For OutPut,但是该语句的一 个重要错误是没有___(28)_____。 (A) 指定打开方式 (B) 指定文件号 (C) 指定打开文件名 (D) 指定文件类型 ? 在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签,两个名称分别 为Command1和Command2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500。编写如下程序: Private Sub Form_Load() Timer1.Enabled=False End Sub Private Sub Command1_Click() Private Sub Timer1_Timer() If Label1.Left&Width Then Label1.Left = Label1.Left + 20 Else Label1.Left=0 End If End SubTimer1.Enabled=True End Sub
程序运行后,单击“开始”按钮,标签在窗体中移动。对于这个程序,以下叙述中错误的是___(29)___ (A) 标签的移动方向为自右向左 (B)单击“停止”按钮后再单击“开始”按钮,标签从停止的位置继续移动 (C) 当标签全部移出窗体后,将从窗体的另一端出现并重新移动 (D)标签按指定的时间时隔移动 ? 设有如下程序,通过For循环计算一个表达式的值,这个表达式是___(30)____: Private Sub Command1_Click() Dim sum As Double, x As Double sum = 0:
n = 0 For i = 1 To 5 x = n / i:
n = n + 1: sum = sum + x Next End Sub (A)1+1/2+ 2/3+3/4+4/5 (B)1+1/2+2/3+3/4 (C)1/2+2/3+3/4+4/5 (D)1+1/2+1/3+1/4+1/5 二、填空题(50分,每空2分) ? Visual Basic中有三种类型的模块文件,即类模块、标准模块和___[1]__窗体模块。 ? 将数学式y3?3 |ab|写成VB表达式,应该是___[2]sqr(y^3+3/abs(a*b))____。 ? 赋值语句:a=123 + MID(&,2)执行后,a变量中的值。 ? Visual Basic提供的对数据文件的三种访问方式为顺序访问方式、随机访问 方式___和二进制访问方式。 ? 执行下列语句序列,显示的结果是___[5]false___。 a = 2: b = 3: c = 4: d = 5 Print 3 & 2 * b Or a = c And b && c Or c & d ? 运行下列程序,单击命令按钮,则Text1中显示___[6]5___,窗体中显示___[7]0___。 Private Sub Command1_Click() Dim i As Integer, j As Integer, a(5, 4) As Integer For i = 2 To 3 For j = 2 To 4
友情链接:

参考资料

 

随机推荐