VB选择题题库
所有单选题
1、在VB的工程中，工程文件的扩展名是______。
A：frm
B：vbg
C：vbp
D：bas
答案：C
等级：1 难度：1
知识点：VB知识点/VB的工程管理和环境设置
2、在VB的应用程序中，窗体文件的扩展名是______。
A：frm
B：vbg
C：vbp
D：bas
答案：A
等级：1 难度：1
知识点：VB知识点/VB的工程管理和环境设置
3、在VB的应用程序中，标准模块文件的扩展名是______。
A：frm
B：vbg
C：vbp
D：bas
答案：D
等级：1 难度：1
知识点：VB知识点/VB的工程管理和环境设置
4、以下关于保存工程的说法正确的是______。
A：保存工程时只保存窗体文件即可
B：保存工程时只保存工程文件即可
C：先保存窗体文件，再保存工程文件
D：先保存工程文件，再保存窗体文件
答案：C
等级：1 难度：1
知识点：VB知识点/VB的工程管理和环境设置
5、在面向对象的程序设计中，最基本的元素是______。
A：窗体文件
B：工程文件
C：属性
D：对象
答案：D
等级：1 难度：1
知识点：VB知识点/VB的编程环境
6、在运行程序时，若要使文本框获得输入焦点，可调用文本框对象的______方法来实现。
A：Refresh
B：GetFocus
C：SetFocus
D：Tab
答案：C
等级：2 难度：2
知识点：VB知识点/简单控件设计
7、在程序运行时，若要获得用户在文本框中所选择的文本，可通过访问______属性来实现。
A：SelStart
B：SelLength
C：Text
D：SelText
答案：D
等级：2 难度：2
知识点：VB知识点/简单控件设计
8、若要设置文本框最大可接收的字符数，可通过______属性来实现。
A：MultiLine
B：Length
C：Max
D：MaxLength
答案：D
等级：1 难度：1
知识点：VB知识点/简单控件设计
9、窗体的标题条显示内容由窗体对象的______属性决定。
A：BackColor
B：BackStyle
C：Text
D：Caption
答案：D
等级：1 难度：1
知识点：VB知识点/简单控件设计
10、若要取消窗体的最大化功能，则可设置______属性为False来实现。
A：ControBox
B：MinButton
C：MaxButton
D：Enabled
答案：C
等级：1 难度：1
知识点：VB知识点/简单控件设计
11、命令按钮的标题文字由____属性来设置。
A：Text
B：Caption
C：Name
D：(名称)
答案：B
等级：1 难度：1
知识点：VB知识点/简单控件设计
12、标签框的边框，由______属性的设置值决定。
A：BackColor
B：BackStlye
C：BorderStyle
D：AutoSize
答案：C
等
级：1 难度：1
知识点：VB知识点/简单控件设计
13、若要使标签框的大小自动与所显示的文本相适应，可通过设置______属性的值为True来实现。
A：AutoSize
B：Alignment
C：Appearance
D：Visible
答案：A
等级：2 难度：2
知识点：VB知识点/简单控件设计
14、标签框所显示的内容，由______属性值决定。
A：Text
B：(名称)
C：Caption
D：Alignment
答案：C
等级：1 难度：1
知识点：VB知识点/简单控件设计
15、标签框文本的对齐方式，由______属性来决定。
A：Text
B：(名称)
C：Caption
D：Alignment
答案：D
等级：1 难度：1
知识点：VB知识点/简单控件设计
16、决定控件上文字的字体、字形、大小、效果的属性是_______。
A：Text
B：Caption
C：Name
D：Font
答案：D
等级：1 难度：1
知识点：VB知识点/简单控件设计
17、以下不能在"工程资源管理器" 窗口中列出的文件类型是_______。
A：.bas
B：.vbp
C：.frm
D：.ocx
答案：D
等级：1 难度：1
知识点：VB知识点/VB的编程环境
18、以下叙述中错误的是_______。
A：Visual Basic 是事件驱动型可视化编程工具
B：Visual Basic应用程序不具有明显的开始和结束语句
C：Visual Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性
D：Visual Basic中控件的某些属性只能在运行时设置
答案：C
等级：1 难度：1
知识点：VB知识点/VB的工程管理和环境设置
19、以下叙述中错误的是_______。
A：在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件
B：以.BAS为扩展名的文件是标准模块文件
C：窗体文件包含该窗体及其控件的属性
D：一个工程中可以含有多个标准模块文件
答案：A
等级：2 难度：2
知识点：VB知识点/VB的工程管理和环境设置
20、以下不属于Visual Basic系统的文件类型是_______。
A：.frm
B：.bat
C：.vbg
D：.vbp
答案：B
等级：1 难度：1
知识点：VB知识点/VB的工程管理和环境设置
21、Visual Basic的编程机制是_______。
A：可视化
B：面向对象
C：面向图形
D：事件驱动
答案：D
等级：1 难度：1
知识点：VB知识点/VB的编程环境
22、启动Visual Basic后，系统为用户新建的工程起一个名为_______的临时名称。
A：工程1
B：窗体1
C：工程
D：窗体
答案：A
等级：1 难度：1
知识点：VB知识点/VB的工程管理和环境设置
23、Visual Basic集成环境的大部分窗口都可以从主菜单
项_______的下拉菜单中找到相应的打开命令。
A：编辑
B：视图
C：格式
D：调试
答案：B
等级：1 难度：1
知识点：VB知识点/VB的编程环境
24、双击窗体的任何地方，可以打开的窗口是_______。
A：代码窗口
B：属性窗口
C：工程管理窗口
D：以上3个选项都不对
答案：A
等级：1 难度：1
知识点：VB知识点/VB的编程环境
25、工具栏中的"启动"按钮的作用是_______。
A：运行一个应用程序
B：运行一个窗体
C：打开工程管理窗口
D：打开被选中对象的代码窗口
答案：A
等级：1 难度：1
知识点：VB知识点/VB的编程环境
26、Visual Basic一共有设计、运行和中断三种模式，不可进行界面设计和代码编辑的模式是_______。
A：设计模式
B：运行模式
C：中断模式
D：任何模式
答案：B
等级：2 难度：2
知识点：VB知识点/VB的工程管理和环境设置
27、唯一能区别一个控件的属性是_______。
A：Caption
B：Text
C：Name
D：Index
答案：C
等级：1 难度：1
知识点：VB知识点/VB的对象、属性、方法和事件
28、通过以下_______窗口可以在设计时直观地调整窗体在屏幕上的位置。
A：代码窗口
B：窗体布局窗口
C：冒体设计面口
D：属性窗口
答案：B
等级：1 难度：1
知识点：VB知识点/简单控件设计
29、以下叙述中错误的是_______。
A：一个工程可以包括多种类型的文件
B：Visual Basic应用程序既能以编译方式执行，也能以解释方式执行
C：程序运行后，在内存中只能驻留一个窗体
D：对于事件驱动型应用程序，每次运行时的执行顺序可以不一样
答案：C
等级：2 难度：2
知识点：VB知识点/VB的工程管理和环境设置
30、下列操作中不能向工程中添加窗体的是_______。
A：单击"工程"菜单中的"添加窗体"命令
B：单击工具栏上的"添加窗体"按钮
C：右击窗体，在弹出的菜单中选择"添加窗体"命令
D：右击工程资源管理器，在弹出的菜单中选择"添加"命令，然后在下一级菜单中选择"添加窗体"命令
答案：C
等级：1 难度：1
知识点：VB知识点/VB的工程管理和环境设置
31、要把一个命令按钮设置成无效，应设置属性______的值为False 0。
A：Visible
B：Enabled
C：Default
D：Cancel
答案：B
等级：1 难度：1
知识点：VB知识点/简单控件设计
32、在窗体上画一个文本框，其名称为Text1。为了在程序运行后Text1中的文本不可编辑，应当使用的语句______。
A：Text1．Clear
B：Text1．Locked=True
C：Text1．Visible：False
D：Text1．Enabled。False
答案：B
等级：2 难度：2
知识点：VB知识点/简单控件设计
33、以下叙述中错误的是______。
A：打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件
B：保存Visual Basic程序时，应分别保存窗体文件及工程文件
C：Visual Basic应用程序只能以解释方式执行
D：事件可以由用户引发，也可以由系统引发
答案：C
等级：1 难度：1
知识点：VB知识点/VB的工程管理和环境设置
34、Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是______。
A：属性、控件和方法
B：属性、事件和方法
C：窗体、控件和过程
D：控件、过程和模块
答案：B
等级：1 难度：1
知识点：VB知识点/VB的对象、属性、方法和事件
35、下列哪项是窗体对象的方法而不是属性___________。
A：Name
B：Print
C：Caption
D：Enabled
答案：B
等级：2 难度：2
知识点：VB知识点/VB的对象、属性、方法和事件
36、若要设置命令按钮为图形风格的命令钮，可通过______属性来设置。
A：Style
B：BorderStyle
C：BackStyle
D：Appearance
答案：A
等级：2 难度：2
知识点：VB知识点/简单控件设计
37、用于从字符串左边截取字符的函数是______。
A：Ltrim()
B：Trim()
C：Left()
D：Instr()
答案：C
等级：1 难度：1
知识点：VB知识点/常用内部函数
38、用于去掉字符串左边空格的函数是______。
A：Ltrim()
B：Rtrim()
C：Right()
D：Mid()
答案：A
等级：1 难度：1
知识点：VB知识点/常用内部函数
39、可实现从字符串任意位置截取字符的函数是______。
A：Instr()
B：Mid()
C：Left()
D：Right()
答案：B
等级：2 难度：2
知识点：VB知识点/常用内部函数
40、可实现字符重复以产生新字符串的函数是______。
A：String()
B：Repl()
C：Ucase()
D：Lcase()
答案：A
等级：1 难度：1
知识点：VB知识点/常用内部函数
41、实现将小写字母转换成大写字母的函数是______。
A：Str()
B：Upper()
C：Ucase()
D：Lcase()
答案：C
等级：1 难度：1
知识点：VB知识点/常用内部函数
42、可获得字符ASCII码值的函数是______。
A：Chr()
B：Fix()
C：Val()
D：Asc()
答案：D
等级：1 难度：1
知识点：VB知识点/常用内部函数
43、VB中的变量如果没有显示声明其数据类型，则默认为______。
A：日期型
B：数据型
C：字符
型
D：变体型
答案：D
等级：1 难度：1
知识点：VB知识点/常量与变量
44、VB中运算符被分为四类，分别是______。
A：算术运算符、连接运算符、关系运算符、逻辑运算符
B：算术运算符、比较运算符、关系运算符、逻辑运算符
C：算术运算符、连接运算符、布尔运算符、逻辑运算符
D：连接运算符、比较运算符、逻辑运算符、关系运算符
答案：A
等级：1 难度：1
知识点：VB知识点/运算符及表达式
45、在VB中，执行"A=18 MOD 4"语句后，A的值为______。
A：2
B：4
C：6
D：8
答案：A
等级：1 难度：1
知识点：VB知识点/运算符及表达式
46、A为True，B为False， 则 "A and B"和 "A Or B"的值分别是______。
A：True,True
B：True,False
C：False,True
D：False,False
答案：C
等级：1 难度：1
知识点：VB知识点/运算符及表达式
47、在VB中，执行 "DimA,B As String" 语句后，A的数据类型为______。
A：整型数
B：实型数
C：字符型
D：可变型
答案：D
等级：1 难度：1
知识点：VB知识点/基本数据类型
48、在VB中，执行 "A=123：B=Str$(A)"语句后，B的数据类型为______。
A：整型数
B：字节型
C：实型数
D：字符型
答案：B
等级：2 难度：2
知识点：VB知识点/常用内部函数
49、数学关系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
答案：B
等级：1 难度：1
知识点：VB知识点/运算符及表达式
50、Int（198.555*100+0.5）/100的值为______。
A：198
B：199.6
C：198.56
D：200
答案：C
等级：2 难度：2
知识点：VB知识点/运算符及表达式
51、下面正确的赋值语句是______。
A：x+y=30
B：y= *r*r
C：y=x+30
D：3y=x
答案：C
等级：1 难度：1
知识点：VB知识点/运算符及表达式
52、为了给三个变量赋初值1，下面正确的赋值语句是______。
A：x=1：y=1：z=1
B：x=1，y=1，z=1
C：x=y=z=1
D：xyz=1
答案：A
等级：1 难度：1
知识点：VB知识点/顺序结构
53、可用于显示系统当前时间的函数是______。
A：Date
B：Date$
C：Time
D：Timer
答案：C
等级：1 难度：1
知识点：VB知识点/常用内部函数
54、下面是合法的变量名为______。
A：x＿yz
B：123abc
C：integer
D：X-Y
答案：A
等级：1 难度：1
知识点：VB知识点/程序书写规则及格式约定
55、VB中，Mid("A2B4",2,1)的值是______。
A：2B
B：0
C
：2
D：4
答案：C
等级：2 难度：2
知识点：VB知识点/常用内部函数
56、在VB中，合法的常量是______。
A：'xxx'
B：2/3
C：5e
D：false
答案：D
等级：1 难度：1
知识点：VB知识点/常量与变量
57、函数Int(Rnd*80)+10是在______范围内的整数。
A：[10,90]
B：[10,89]
C：[11,90]
D：[11,89]
答案：B
等级：2 难度：2
知识点：VB知识点/常用内部函数
58、要声明一个长度为256个字符的定长字符串变量str，下列语句正确的是______。
A：dim str as string
B：dim str as string(256)
C：dim str as string[256]
D：dim str as string*256
答案：D
等级：1 难度：1
知识点：VB知识点/常量与变量
59、表达式2*3^2+2*8/4+3^2的值是______。
A：64
B：31
C：49
D：22
答案：B
等级：2 难度：2
知识点：VB知识点/运算符及表达式
60、下列______是日期型常量。
A："07/03/11"
B：02/02/11
C：#03/01/19#
D：{2/11/02}
答案：C
等级：1 难度：1
知识点：VB知识点/常量与变量
61、Visual Basic中不存在下列哪一种数据类型______。
A：字符串类型
B：日期类型
C：逻辑类型
D：指针类型
答案：D
等级：1 难度：1
知识点：VB知识点/基本数据类型
62、对变量名说法不正确的是______。
A：必须是字母开头，不能是数字或其他字符
B：不能是VB的保留字
C：可以包含字母、数字、下划线和标点符号
D：不能超过255个字符
答案：C
等级：1 难度：1
知识点：VB知识点/常量与变量
63、以下变量名中，______是不符合Visual Basic的命名规范的。
A：Abc901
B：_mnu_Open_234
C：price_
D：K
答案：B
等级：1 难度：1
知识点：VB知识点/程序书写规则及格式约定
64、当50≤X≤200时，则给变量Y赋值为1000的正确的If判定语句是______。
A：If 50≤X≤200 then y=1000
B：If x<=200 and x>=50 then y=1000
C：If x<=200 or x>=50 then y=1000
D：If x>=50,x<=200 then y=1000
答案：B
等级：2 难度：2
知识点：VB知识点/运算符及表达式
65、若a=2,b=3,c=4,下列表达式的值是______。
a>b and b>c or not a>c
A：True
B：False
C：yes
D：no
答案：A
等级：2 难度：2
知识点：VB知识点/运算符及表达式
66、下列属于正确的字符串常量的是______。
A：#ABC"
B：$ABC$
C：'ABC'
D："ABC"
答案：D
等级：1 难度：1
知识点：VB知识点/常量与变量
67、执行下列代码，分别输入12和89，输出结果是______。
Private Sub Form_Click()
a=InputBox("D")
b=InputBo
x("E")
Print a+b
End Sub
A：101
B：DE1289
C：DE
D：1289
答案：D
等级：2 难度：2
知识点：VB知识点/常用内部函数
68、表达式6+10 Mod 4*2+1的值是______。
A：9
B：11
C：1
D：3
答案：A
等级：2 难度：2
知识点：VB知识点/运算符及表达式
69、把数值型转换为字符串型需要使用下列哪一种函数______。
A：Val()
B：Str()
C：Asc()
D：Chr()
答案：B
等级：1 难度：1
知识点：VB知识点/常用内部函数
70、数学式子sin25°写成VB表达式是______。
A：sin25
B：Sin(25)
C：Sin(25*3.14/180)
D：Sin(25°)
答案：C
等级：2 难度：2
知识点：VB知识点/常用内部函数
71、若x是一个正实数，对x的第3位小数四舍五入的表达式是______。
A：0.01*Int(x+0.005)
B：0.01*Int(100*(x+0.005))
C：0.01*Int(100*(x+0.05))
D：0.01*Int(x+0.05)
答案：B
等级：2 难度：2
知识点：VB知识点/运算符及表达式
72、函数Left("Hello",2)的值为______。
A：He
B：el
C：lo
D：True
答案：A
等级：1 难度：1
知识点：VB知识点/常用内部函数
73、函数Int(Abs(99-100)/2)的值为______。
A：1
B：0
C："1"
D："0"
答案：B
等级：2 难度：2
知识点：VB知识点/常用内部函数
74、以下声明语句中错误的是______。
A：Const var1=123
B：Dim var2 = 'ABC'
C：Dim var3
D：Static var4 As Integer
答案：B
等级：1 难度：1
知识点：VB知识点/程序书写规则及格式约定
75、设a=10，b=5，c=1，执行语句Print a > b > c后，窗体上显示的是______。
A：True
B：False
C：1
D：出错信息
答案：B
等级：2 难度：2
知识点：VB知识点/运算符及表达式
76、下列选项中不是字符串常量的是______。
A："ab"
B："你好"
C："2006"
D：1235
答案：D
等级：1 难度：1
知识点：VB知识点/常量与变量
77、以下运算符中运算优先级最高的是______。
A：＋
B：－
C：>=
D：*
答案：D
等级：1 难度：1
知识点：VB知识点/运算符及表达式
78、下列关于字符串连接运算"+"和"&"的叙述正确的是______。
A："&"两旁要求均为字符串
B："+"两旁不管是字符型还是数值型，系统都将操作数转换成字符型，再连接
C："&"与"+"都要求两旁必须为字符串
D：若在字符串变量名后使用"&"，则在变量名与"&"之间应有一个空格
答案：D
等级：2 难度：2
知识点：VB知识点/运算符及表达式
79、下列表达式中的值不为6的是______。
A：19\3
B：19/3
C
：Int(19/3)
D：19 mod 13
答案：B
等级：1 难度：1
知识点：VB知识点/运算符及表达式
80、下列不是合法的赋值语句的是______。
A：iNumber_1 = 45
B：（4+5）*3.5 = num
C：Label1.caption = time
D：num = （4+5）*3.5
答案：B
等级：2 难度：2
知识点：VB知识点/顺序结构
81、下列逻辑表达式中值为False的是______。
A：Int(14 / 3)= 4
B：((1 + 2)<= 3 ) and (4 + 5 > 7)
C：Int(Rnd()* 3)<= 3
D："abc">"bc"
答案：D
等级：2 难度：2
知识点：VB知识点/运算符及表达式
82、VB中将两个字符串连接起来的运算符有：+和&，那么"123"+45结果是______。
A：168
B：12345
C："123"
D：45
答案：A
等级：2 难度：2
知识点：VB知识点/运算符及表达式
83、以下能够触发文本框Change事件的操作是______。
A：文本框失去焦点
B：文本框获得焦点
C：设置文本框的焦点
D：改变文本框的内容
答案：D
等级：1 难度：1
知识点：VB知识点/控件的基本知识
84、窗体上有一个文本框控件，名称为TxtTime；一个计时器控件，名称为Timer1。要求每一秒钟在文本框中显示一次当前的时间，程序为：
Private sub timerl_?
Txttime.text=time
End Sub
在?处应填入的内容是______。
A：Enabled
B：Visible
C：Interval
D：Timer
答案：D
等级：2 难度：2
知识点：VB知识点/控件的基本知识
85、图像框(Image)有一个属性，可以自动调整图形的大小，以适当图像框的尺寸，这个属性是______。
A：Autosize
B：Stretch
C：AutoRedraw
D：Appearance
答案：B
等级：1 难度：1
知识点：VB知识点/图形控件
86、设窗体上有一个列表框控件List1，且其中含有若干列表。则以下能表示当前被选中的列表项内容的是______。
A：List1.List
B：List1.ListIndex
C：List1.Index
D：List1.Text
答案：D
等级：2 难度：2
知识点：VB知识点/列表框和组合框
87、设组合框Combo1中有3个项目，则以下能删除最后一项的语句是______。
A：Combo1.Removeitem Text
B：Combo1.Removeitem 2
C：Combo1.Removeitem 3
D：Combo1.Removeitem Combo1.Listcount
答案：B
等级：2 难度：2
知识点：VB知识点/列表框和组合框
88、通过控件数组的______属性，可区分控件数组中的不同元素。
A：Name
B：Title
C：Caption
D：Index
答案：D
等级：2 难度：2
知识点：VB知识点/控件数组
89、事件过程是指______时所执行的程序代码。
A：运行程序
B：响应事件
C：设置属性
D：使用控件
答案：B
等级：1
难度：1
知识点：VB知识点/VB的对象、属性、方法和事件
90、列表框中的列表内容通过______属性设置。
A：Columns
B：List
C：ListIndex
D：ListCount
答案：B
等级：2 难度：2
知识点：VB知识点/列表框和组合框
91、调用列表框控件的______方法，可清除列表框中的所有列表项。
A：Cls
B：RemoveItem
C：Clear
D：Remove
答案：C
等级：2 难度：2
知识点：VB知识点/列表框和组合框
92、执行多窗体应用程序时______。
A：只能打开一个窗体，其他的窗体都会被关闭
B：允许同时打开多个窗体
C：打开一个窗体后，其他的窗体都自动隐藏
D：在某一个时刻只能打开一个窗体
答案：B
等级：3 难度：3
知识点：VB知识点/多重窗体
93、以下关于多窗体应用程序的叙述中，正确的是______。
A：连续向工程添加多个窗体，存盘后只生成一个窗体模块
B：连续向工程添加多个窗体，会生成多个窗体模块
C：每添加一个窗体，即生成一个工程文件
D：只能将第一个建立的窗体作为启动界面
答案：B
等级：2 难度：2
知识点：VB知识点/多重窗体
94、以下表述正确的是______。
A：Load语句与Show方法的功能相同
B：Unload语句与Hide方法的功能完全相同
C：Load语句与Unload的功能完全相反
D：以上三种说法都不正确
答案：C
等级：2 难度：2
知识点：VB知识点/多重窗体
95、在文本框的______属性值设为True的情况下，设置ScrollBars属性可使文本框中出现滚动条。
A：Locked
B：Alignment
C：Multilines
D：Enabeld
答案：C
等级：2 难度：2
知识点：VB知识点/综合应用程序举例
96、对______控件，将______属性设置为True，可实现图形自动调整大小以适应控件。
A：图像框、AutoSize
B：图片框、AutoSize
C：图像框、Stretch
D：图片框、Stretch
答案：C
等级：3 难度：3
知识点：VB知识点/图形控件
97、通过______函数，可将指定的图形赋值给对象的Picture属性。
A：LoadImage
B：ImageLoad
C：PictureLoad
D：LoadPicture
答案：D
等级：1 难度：1
知识点：VB知识点/图形控件
98、为了使图片框和图像框的大小适应图片的大小，下面设置正确的是______。
A：AutoSize=True Stretch=True
B：AutoSize=True Stretch=False
C：AutoSize=False Stretch=True
D：AutoSize=False Stretch=False
答案：B
等级：3 难度：3
知识点：VB知识点/图形控件
99、Cls可清除窗体或图片框中______的内容。
A：Picture属性设置的背景图案
B：在设计时
放置的控件
C：程序运行时产生的文字
D：以上A-C全部
答案：C
等级：1 难度：1
知识点：VB知识点/图形控件
100、如果想在图片框上输出文字，则______。
A：只能使用图片编辑软件加入要输出的文字
B：可以使用Print方法在图片框上输出文字
C：不可以直接在图片框上输出文字
D：以上说法都不对
答案：B
等级：1 难度：1
知识点：VB知识点/图形控件
101、关于图片框和文本框的说法正确的是______。
A：图片框中既可以有文本也可以有图形，而文本框中只能有文字
B：图片框和文本框都有可以加载图片
C：当在图片框中增加内容时，图片框会自动变大，而文本框不会
D：可以通过Cls方法清除图片框与文本框中的内容
答案：A
等级：1 难度：1
知识点：VB知识点/图形控件
102、下列关于图像框控件的说法不正确的是______。
A：不可以作为容器使用
B：不支持图形方法
C：没有事件
D：只能用于显示图像
答案：C
等级：1 难度：1
知识点：VB知识点/控件的基本知识
103、下列关于PictureBox控件与Image控件的说法不正确的是______。
A：PictureBox可以作为控件容器，因此比Image占用系统资源多
B：Image能自动调整大小以适应载入的图片
C：PictureBox除具有Image的所有特性外，还能作为容器
D：PictureBox能使图片自动调整大小以适应自身的大小
答案：D
等级：2 难度：2
知识点：VB知识点/图形控件
104、当单击了单选按钮控件后，下列说法正确的是______。
A：只执行Click事件
B：只执行GetFocus
C：既执行事件Click，也执行事件GetFocus
D：具体执行哪个事件要在程序或属性中设定
答案：C
等级：1 难度：1
知识点：VB知识点/单选按钮和复选框
105、复选框的Value属性为1时，表示______。
A：复选框未被选中
B：复选框被选中
C：复选框内有灰色的勾
D：复选框操作有错误
答案：B
等级：1 难度：1
知识点：VB知识点/单选按钮和复选框
106、复选框对象是否被选中，可由其______属性判断。
A：Checked
B：Value
C：Enabled
D：Selected
答案：B
等级：1 难度：1
知识点：VB知识点/单选按钮和复选框
107、框架内的所有控件是______。
A：随框架一起移动、显示、消失和屏蔽
B：不随框架一起移动、显消失和屏蔽
C：仅随框架一起移动
D：仅随框架一起显示和消失
答案：A
等级：1 难度：1
知识点：VB知识点/框架Frame控件
108、下列控件中，没有Caption属性的是______
。
A：框架
B：列表框
C：复选框
D：单选按钮
答案：B
等级：2 难度：2
知识点：VB知识点/控件的基本知识
109、以下不允许用户在程序运行时输入文字的控件是______。
A：文本框
B：下拉式组合框
C：简单组合框
D：下拉式列表框
答案：D
等级：3 难度：3
知识点：VB知识点/控件的基本知识
110、时钟控件的时间间隔是______。
A：以毫秒计
B：以分钟计
C：以秒计
D：以小时计
答案：A
等级：1 难度：1
知识点：VB知识点/时钟控件
111、复选框或单选按钮的当前状态可通过______属性来设置或访问。
A：Value
B：Checked
C：Selected
D：Caption
答案：A
等级：2 难度：2
知识点：VB知识点/单选按钮和复选框
112、若要设置定时器控件的定时时间，可通过______属性来设置。
A：Interval
B：Value
C：Enabled
D：Text
答案：A
等级：1 难度：1
知识点：VB知识点/时钟控件
113、若要暂时关闭定时器，可通过设置______属性为False来实现。
A：Visible
B：Enabled
C：Interval
D：Timer
答案：B
等级：1 难度：1
知识点：VB知识点/时钟控件
114、图像框或图片框中显示的图形，由对象的______属性值决定。
A：Picture
B：Image
C：Downpicture
D：Icon
答案：A
等级：1 难度：1
知识点：VB知识点/图形控件
115、设计动画时通常使用时钟控件______来控制动画速度。
A：Move
B：Interval
C：timer
D：Gotfocus
答案：B
等级：1 难度：1
知识点：VB知识点/图形控件
116、若要获知当前列表项的数目，可通过访问______属性来实现。
A：List
B：ListIndex
C：ListCount
D：Text
答案：C
等级：1 难度：1
知识点：VB知识点/列表框和组合框
117、若要向列表框新增列表项，可使用的方法是______。
A：Add
B：Remove
C：Clear
D：AddItem
答案：D
等级：1 难度：1
知识点：VB知识点/列表框和组合框
118、若要清除列表框的内容，可使用______方法来实现。
A：Add
B：Remove
C：Clear
D：AddItem
答案：C
等级：1 难度：1
知识点：VB知识点/列表框和组合框
119、组合框的风格可通过______属性来设置。
A：BackStyle
B：BorderStyle
C：Style
D：Sorted
答案：C
等级：1 难度：1
知识点：VB知识点/列表框和组合框
120、假定建立了一个名为Command1的命令按钮数组，则以下说法中错误的是______。
A：数组中每个命令按钮的名称(名称属性)均为Command1
B：数组中每个命令按钮的标题(Caption属性)都一样
C：数组中所有命令按钮可以使用同一个事件过程
D：用名称Command1(下标)可以访问数组中的每个命令按钮
答案：B
等级：2 难度：2
知识点：VB知识点/控件数组
121、设有如下通用过程：
Public Sub Fun(a() As Integer, x As Integer)
For i=1 To 5
x=x+a(i)
Next
End Sub
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程：
Private Sub Command1_Click()
Dim arr(5) As Integer, n As integer
For i=1 To 5
arr(i)=i+i
Next
Call Fun(arr,n)
Text1.Text=Str(n)
End Sub
程序运行后，单击命令按钮，则在文本框上显示的是______。
A：30
B：25
C：20
D：15
答案：A
等级：3 难度：3
知识点：VB知识点/过程应用案例
122、语句Dim s(1 to 5) as Single定义的数组有______个元素。
A：5
B：6
C：1
D：15
答案：A
等级：1 难度：1
知识点：VB知识点/数组的定义和引用
123、语句Dim s(1 to 5) as Single定义的数组是______类型的元素。
A：整型
B：日期型
C：逻辑型
D：单精度实型
答案：D
等级：1 难度：1
知识点：VB知识点/数组的定义和引用
124、语句Dim s(5) as Single定义的数组默认情况下有______个元素。
A：5
B：6
C：2
D：10
答案：B
等级：1 难度：1
知识点：VB知识点/数组的定义和引用
125、语句Dim s(1 to 5) as Double定义的数组是______类型的元素。
A：整型
B：日期型
C：逻辑型
D：双精度实型
答案：D
等级：1 难度：1
知识点：VB知识点/数组的定义和引用
126、语句Dim s(1 to 5) as Currency定义的数组是______类型的元素。
A：整型
B：货币型
C：逻辑型
D：单精度实型
答案：B
等级：1 难度：1
知识点：VB知识点/数组的定义和引用
127、语句Dim s(1 to 5) as Boolean定义的数组是______类型的元素。
A：整型
B：日期型
C：逻辑型
D：单精度实型
答案：C
等级：1 难度：1
知识点：VB知识点/数组的定义和引用
128、语句Dim birthday(1 to 5) as Date定义的数组是______类型的元素。
A：整型
B：日期型
C：逻辑型
D：单精度实型
答案：B
等级：1 难度：1
知识点：VB知识点/数组的定义和引用
129、语句Dim s(1 to 5) as String定义的数组是______类型的元素。
A：整型
B：日期型
C：逻辑型
D：字符型
答案：D
等级：1 难度：1
知识点：VB知识点/数组的定义和引用
130、语句Dim a(5) 定义的数组
是______类型的元素。
A：整型
B：空类型
C：逻辑型
D：变体型
答案：D
等级：1 难度：1
知识点：VB知识点/数组的定义和引用
131、语句Option Base n定义数组下标下界时，n可以是______。
A：0
B：1
C：0或1
D：任意整数
答案：C
等级：1 难度：1
知识点：VB知识点/数组的定义和引用
132、数组下标上界和下界可以是任何______常量或常量表达式。
A：整型
B：日期型
C：逻辑型
D：字符型
答案：A
等级：1 难度：1
知识点：VB知识点/数组的概念
133、语句Dim aa(－1 to 1，－2 to 1) 定义了一个______的二维数组。
A：2行2列
B：1行2列
C：3行4列
D：1行1列
答案：C
等级：1 难度：1
知识点：VB知识点/数组的定义和引用
134、语句Dim aa(－1 to 1，－2 to 1)定义的二维数组共有______个元素。
A：2
B：12
C：4
D：6
答案：B
等级：2 难度：2
知识点：VB知识点/数组的定义和引用
135、语句Dim aa(－1 to 1，－2 to 1)定义的二维数组下标下界是______。
A：－1和－2
B：－1
C：－2
D：2
答案：A
等级：1 难度：1
知识点：VB知识点/数组的定义和引用
136、如果Dim a(－1 to 2) ，则函数LBound（a）的返回值是______。
A：－1和－2
B：－1
C：－2
D：2
答案：B
等级：2 难度：2
知识点：VB知识点/数组的定义和引用
137、如果Dim a(－1 to 2) ，则函数UBound（a）的返回值是______。
A：－1和－2
B：－1
C：－2
D：2
答案：D
等级：1 难度：1
知识点：VB知识点/数组的定义和引用
138、根据需要用______可以重新确定动态数组的大小。
A：ReDim
B：Dim
C：Static
D：Public
答案：A
等级：1 难度：1
知识点：VB知识点/静态数组与动态数组
139、用ReDim不可以改变动态数组的______。
A：大小
B：类型
C：维数
D：下标值
答案：B
等级：2 难度：2
知识点：VB知识点/静态数组与动态数组
140、Private Sub Command1_Click()
Dim aa As Variant
aa=Array(1,2,3,4)
End Sub
上面程序运行后，aa(1)的值是______。
A：1和2
B：1
C：2
D：3
答案：C
等级：2 难度：2
知识点：VB知识点/数组的基本操作
141、Private Sub Command1_Click()
Dim aa As Integer
aa=Array(2,4,6,8)
End Sub
上面程序运行后，aa(1)的值是______。
A：4
B：1
C：2
D：6
答案：A
等级：2 难度：2
知识点：VB知识点/数组的基本操作
142、Private Sub Command1_Click()
Dim aa
aa=Array("一", "二", "三", "四")
For i=0 to
3
aa(i)=aa(i) +"分店"
Next i
End Sub
上面程序运行后，aa(2)的值是______。
A：一分店
B：二分店
C：三分店
D：四分店
答案：C
等级：2 难度：2
知识点：VB知识点/数组应用举例
143、Private Sub Command1_Click()
Dim aa
aa=Array("一", "二", "三", "四")
For i=0 to 3
aa(i)=aa(i) +"公司"
Next i
End Sub
上面程序运行后，aa(1)的值是______。
A：一公司
B：二公司
C：三公司
D：四公司
答案：B
等级：2 难度：2
知识点：VB知识点/数组应用举例
144、Private Sub Command1_Click()
Dim aa
aa=Array("一", "二", "三", "四")
For i=0 to 3
aa(i)=aa(i) +"小组"
Next i
End Sub
上面程序运行后，aa(1)的值是______。
A：一小组
B：二小组
C：三小组
D：四小组
答案：B
等级：1 难度：1
知识点：VB知识点/数组应用举例
145、Private Sub Command1_Click()
Dim aa(4) as Integer
For i=1 to 4
aa(i)= aa(i)+2
Next i
End Sub
上面程序运行后，aa(1)的值是______。
A：4
B：1
C：2
D：0
答案：C
等级：1 难度：1
知识点：VB知识点/数组应用举例
146、Private Sub Command1_Click()
Dim b(4) as Integer
For i=0 to 3
b(i)=b(i) +2
Next i
End Sub
上面程序运行后，b(1)的值是______。
A：4
B：1
C：0
D：2
答案：D
等级：1 难度：1
知识点：VB知识点/数组应用举例
147、Private Sub Command1_Click()
Dim w(4) as Integer
For i=0 to 3
w(i)=w(i) +4
Next i
End Sub
上面程序运行后，w(1)的值是______。
A：4
B：1
C：0
D：2
答案：A
等级：2 难度：2
知识点：VB知识点/数组应用举例
148、Private Sub Command1_Click()
Dim t(4) as Integer
For i=0 to 3
t(i)= i
Next i
End Sub
上面程序运行后，t(1)的值是______。
A：4
B：1
C：0
D：2
答案：B
等级：1 难度：1
知识点：VB知识点/数组应用举例
149、Private Sub Command1_Click()
Dim t(4) as Integer
For i=1 to 4
t(i)= i+1
Next i
End Sub
上面程序运行后，t(1)的值是______。
A：4
B：1
C：0
D：2
答案：D
等级：2 难度：2
知识点：VB知识点/数组应用举例
150、Private Sub Command1_Click()
Dim b(4) as Integer
For i=1 to 4
b(i)= i+1
Next i
End Sub
上面程序运行后，b(2)的值是______。
A：3
B：1
C：0
D：2
答案：A
等级：1 难度：1
知识点：VB知识点/数组应用举例
151、Private Sub Command1_Click()
Dim w(4) as integer
Dim y() as integer
For i=0 to 4
w(i)= i+2
Next i
y=w
End Sub
上面程序运行后，y(1)的值是______。
A：0
B：1
C：3
D：2
答案：C
等级：2 难度：2
知识点：VB知识点/数组的基本操
作
152、Private Sub Command1_Click()
Dim w(4) as integer
Dim y() as integer
For i=0 to 4
w(i)= 2 * i
Next i
y=w
End Sub
上面程序运行后，y(1)的值是______。
A：0
B：1
C：3
D：2
答案：D
等级：2 难度：2
知识点：VB知识点/数组应用举例
153、Private Sub Command1_Click()
Dim w(4) as integer
Dim y() as integer
For i=0 to 4
w(i)= 3 * i
Next i
y=w
End Sub
上面程序运行后，y(2)的值是______。
A：0
B：6
C：3
D：2
答案：B
等级：2 难度：2
知识点：VB知识点/数组的基本操作
154、Private Sub Command1_Click()
Dim w(4) as integer
Dim y() as integer
For i=0 to 4
w(i)= w(i) + 3
Next i
y=w
End Sub
上面程序运行后，y(1)的值是______。
A：0
B：6
C：3
D：2
答案：C
等级：2 难度：2
知识点：VB知识点/数组应用举例
155、在picture1上输出数组W(i)的值用______语句可以实现。
A：Pictrue1.Print W(i)
B：Pictrue1= W(i)
C：Pictrue1.Picture= W(i)
D：Print W(i)
答案：A
等级：2 难度：2
知识点：VB知识点/数组的基本操作
156、控件数组中第一个元素的Index值是______。
A：0
B：1
C：空值
D：2
答案：A
等级：1 难度：1
知识点：VB知识点/控件数组
157、某个控件的Index值默认情况是______。
A：0
B：1
C：空值
D：2
答案：C
等级：2 难度：2
知识点：VB知识点/控件的基本知识
158、可以通过修改控件数组中控件的______值改变其在数组中的顺序。
A：Font
B：Caption
C：Name
D：Index
答案：D
等级：2 难度：2
知识点：VB知识点/控件数组
159、在程序运行时用______语句可以添加控件数组元素。
A：Add
B：New
C：Index
D：Load
答案：D
等级：3 难度：3
知识点：VB知识点/控件数组
160、在程序运行时用______语句可以删除控件数组元素。
A：UnLoad
B：Delete
C：Index
D：Load
答案：A
等级：3 难度：3
知识点：VB知识点/控件数组
161、Private Sub Command1_Click(Index As Integer)
Select Case Index
Case 0
Label1.BackColor= VbRed
Case 1
Label1.BackColor= VbGreen
Case 2
Label1.BackColor= VbBlue
End Select
End Sub
程序运行时单击第二个命令按扭Label1的背景色是______色。
A：红
B：绿
C：蓝
D：白
答案：B
等级：2 难度：2
知识点：VB知识点/控件数组
162、Private Sub Command1_Click(Index As Integer)
Select Case Index
Case 0
Text1.BackColor = VbRed
Case 1
Text1.BackColor = VbGreen
Case 2
Text1.BackColor = VbBlue
End Select
End Sub
程序运行时单击第三个命令按扭Text1的背景色是______色。
A：红
B：绿
C：蓝
D：白
答案：C
等级：2 难度：2
知识点：VB知识点/控件数组
163、Private Sub Command1_Click()
Dim i as integer,j as integer
Dim b(5,5) as integer
For i=0 to 3
For j=0 to 3
b(i,j) = i*2 + j
Print b(i,j)
Next j
Print
Next i
End Sub
上面程序运行后,b数组的第2行第2列的数是______。
A：6
B：5
C：4
D：3
答案：D
等级：3 难度：3
知识点：VB知识点/数组应用举例
164、Private Sub Command1_Click()
Dim i as integer， j as integer
Dim k(5,5) as integer
For i=1 to 3
For j=1 to 3
k(i,j) = i*2 + j
Print k(i,j)
Next j
Print
Next i
End Sub
上面程序运行后的k(2,3)的值是______。
A：6
B：7
C：8
D：9
答案：B
等级：3 难度：3
知识点：VB知识点/数组应用举例
165、运行程序时，系统自动执行窗体的______事件。
A：Load
B：Click
C：Unload
D：GotFocus
答案：A
等级：1 难度：1
知识点：VB知识点/简单控件设计
166、以下对变量或常量的声明语句中错误的是______。
A：dim d1
B：dim d2＝"123"
C：Const d3＝123
D：Static d4%
答案：B
等级：1 难度：1
知识点：VB知识点/程序书写规则及格式约定
167、若要设置或返回文本框中的文本，可通过文本框的______属性来实现。
A：Caption
B：(名称)
C：Text
D：Name
答案：C
等级：1 难度：1
知识点：VB知识点/简单控件设计
168、确定控件在窗体上的位置的属性是______。
A：Width或Height
B：Width和Height
C：Top或Left
D：Top和Left
答案：D
等级：2 难度：2
知识点：VB知识点/简单控件设计
169、下列符号中不能作为VB变量名的是______。
A：bc2
B：f0a
C：26abc
D：XYZ
答案：C
等级：1 难度：1
知识点：VB知识点/常量与变量
170、下面语句Dim A(-3 To 5) As Integer定义的数组的元素个数是______。
A：6
B：7
C：8
D：9
答案：D
等级：1 难度：1
知识点：VB知识点/数组的定义和引用
171、用下面语句定义的数组的元素个数是______。
Option Base 0
Dim a(5) As Integer
A：5
B：6
C：7
D：8
答案：B
等级：2 难度：2
知识点：VB知识点/数组的定义和引用
172、下面语句中正确的是______。
A：Dim a As Variant
a = Array(1,2,3,4,5)
B：Dim a(10) As Integer
a = Array(1,2,3,4,5)
C：Dim a%(10)
a(1) = "ABCDE"
D：Dim a(3),b(3) As Integer
a(0) = 0
a(1) = 1
a(2) = 2
b = a
答案：A
等级：2 难度：2
知识点：VB知识点/数组的定义和引用
173、Public conters(2 to 14) As Integer声明正确的是______。
A：
定义一个公用变量conters，其值可以是2到14之间的一个整型数
B：定义一个公用数组conters，数组内可存放14个整数
C：定义一个公用数组conters，数组内可存放13个整数
D：定义一个公用数组conters，数组内可存放12个整数
答案：C
等级：1 难度：1
知识点：VB知识点/数组的定义和引用
174、在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Private Sub Command1_Click()
Dim Arr1(10), arr2(10) As Integer
n=3
For i = 1 To 5
Arr1(i) = i
arr2(n) = 2 * n + i
Next i
Print arr2(n); Arr1(n)
End Sub
程序运行后，单击命令按钮，输出结果是______。
A：11 3
B：3 11
C：13 3
D：3 13
答案：A
等级：3 难度：3
知识点：VB知识点/数组应用举例
175、在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Option Base 1
Private Sub Command1_Click()
Dim a(10), p(3) As Integer
k=5
For i= 1 To 10
a(i)= i
Next i
For i= 1 To 3
p(i) = a(i * i)
Next i
For i = 1 To 3
k = k + p(i) * 2
Next i
End Sub
程序运行后，单击命令按钮，输出k的值是______。
A：35
B：28
C：33
D：37
答案：C
等级：3 难度：3
知识点：VB知识点/数组应用举例
176、在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Option Base 1
Private Sub Command1_Click()
Dim a
a = Array(1, 2, 3, 4)
j=1
For i = 4 To 1 Step -1
s = s + a(i)*j
j =j * 10
Next i
End Sub
运行上面的程序，单击命令按钮，输出s的值是______。
A：4321
B：12
C：34
D：1234
答案：D
等级：3 难度：3
知识点：VB知识点/数组应用举例
177、在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Option Base 1
Private Sub Command1_Click()
Dim Arr(3) As Integer
For i = 1 To 3
For j = 1 To 3
Arr(j) = Arr(i) + 1
Next j
Next i
End Sub
程序运行后，单击命令按钮，输出Arr(3)的值是______。
A：7
B：6
C：5
D：4
答案：C
等级：3 难度：3
知识点：VB知识点/数组应用举例
178、以下程序输出的结果是______。
Option Base 1
Private Sub Command1_Click()
Dim a%(3, 3)
For i = 1 To 3
For j = 1 To 3
If j > 1 And i > 1 Then
a(i, j) = a(a(i - 1, j - 1), a(i, j - 1)) + 1
Else
a(i, j) = i * j
End If
Print a(i, j); " ";
Next j
Print
Next i
End Sub
A：1 2 3
2 3 1
3 2 3
B：1 2 3
1 2 3
1 2 3
C：1 2 3
2 4 6
3 6 9
D：1 1 1
2 2 2
3 3 3
答案：A
等级：3 难度：3
知识点：VB知识点/数组应用举例
179、下面程序的功能是：计算1到50之间的偶数和及偶数平方和,并显示出来。请选择正确答案。
Private Sub Form_Click()
Dim SUM1 As Integer,
SUM2 As Integer, I As Integer
SUM1 = 0: SUM2 = 0
For I = 2 To 50 Step 2
SUM1 =______
SUM2 = SUM2+I*I
Next I
Print "偶数和=";SUM1
Print "偶数平方和=";SUM2
End Sub
A：I
B：I*I
C：SUM1+I
D：SUM2+I*I
答案：C
等级：3 难度：3
知识点：VB知识点/控制结构应用程序举例
180、下面程序的功能是：读入n后，求算式 1+1/2！+1/3！+……+1/n！的值。请选择正确答案。
Private Sub Form_Click()
Dim SUM As Single, ITEM As Single
Dim NN As String
Dim I As Integer, J As Integer, N As Integer
NN = InputBox("请输入求的项数n")
N = VAL（nn）
SUM = 1
For I = 2 To N
ITEM = 1
For J = 1 To I
ITEM =______
Next J
SUM = SUM+1/ITEM
Next I
Print "SUM="; SUM
End Sub
A：ITEM*J
B：ITEM+J
C：J*J
D：ITEM*ITEM
答案：A
等级：3 难度：3
知识点：VB知识点/控制结构应用程序举例
181、在窗体上有一个名称为command1的命令按钮，然后编写如下事件过程。请在______处选择正确答案。
Private Sub Command1_Click()
Dim a As Integer, s As Integer
a = 8: s = 1
Do
s = s + a: a = a - 1
Loop While a <= 0
End Sub
程序运行后，单击命令按钮，s的值为______，a的值为7。
A：7
B：34
C：9
D：死循环
答案：C
等级：3 难度：3
知识点：VB知识点/控制结构应用程序举例
182、以下属于Visual Basic合法的数组元素是______。
A：x8
B：x[8]
C：s(0)
D：v.8
答案：C
等级：1 难度：1
知识点：VB知识点/数组的概念
183、设有命令按钮Command1的单击事件过程，代码如下：
Private Sub Command1_Click()
Dim a(3，3)As Integer
For i=1 To 3
For j=1 To 3
a(i，j)=i*j+i
Next j
Next i
Sum=0
For i=1 To 3
Sum=Sum+a(i，4-i)
Next i
End Sub
运行程序，单击命令按钮，输出Sum的结果是______。
A：20
B：7
C：16
D：17
答案：C
等级：3 难度：3
知识点：VB知识点/数组应用举例
184、在窗体上添加如下命令按钮，然后编写如下事件过程：
Private Sub Command1 _ Click()
Dim a(10)As Integer
Dim p(3)As Integer
k=5
For i=1 To 10
a(i)=i
Next i
For i=1 To 3
p(i)=a(i*i)
Next i
For i=1 To 3
k=k+p(i)*2
Next i
End Sub
运行程序，单击命令按钮，输出k的结果是______。
A：35
B：33
C：31
D：29
答案：B
等级：3 难度：3
知识点：VB知识点/数组应用举例
185、设有如下程序：
Option Base 0
Private Sub Form _ Click( )
Dim a
Dim i As Integer
a=Array(1，2，3，4，5，6，7，8，9)
For i=0 To 3
Print a(5-i);
Next i
End Sub
程序运行后，单击窗体，则在窗体上显示的是______。
A：4 3 2 1
B：5 4 3 2
C：6 5 4 3
D：7 6 5 4
答案：C
等级：3 难度：3
知识点：VB知识点/
数组应用举例
186、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim array1(10,10) As Integer
Dim i,j As Integer
For i=1 To 3
For j=2 To 4
array1(i,j)=i+j
Next j
Next i
Text1.Text=array1(2,3)+array1(3,4)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是______。
A：12
B：13
C：14
D：15
答案：A
等级：3 难度：3
知识点：VB知识点/数组应用举例
187、在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Private Sub Command1_Click()
Dim i As Integer,j As Integer
Dim a(10,10)As Integer
For i=1 To 3
For j=1 To 3
a(i,j)=(i-1)*3+j
Print a(i,j);
Next j
Print
Next i
End Sub
程序运行后，单击命令按钮，窗体上显示的是______。
A：123
246
369
B：234
345
456
C：147
258
369
D：123
456
789
答案：D
等级：3 难度：3
知识点：VB知识点/数组应用举例
188、在窗体上画三个单选按钮，组成一个名为chkOption的控件数组。用于标识各个控件数组元素的参数是_____。
A：Tag
B：Index
C：ListIndex
D：Name
答案：B
等级：2 难度：2
知识点：VB知识点/控件数组
189、设在窗体上有一个名称为Command1的命令按钮，并有以下事件过程
Private Sub Command1_Click()
Static b As Variant
b=Array(1,3,5,7,9)
……
End Sub
此过程的功能是把数组b中的5个数逆序存放（即排列为9,7,5,3,1）。为实现此功能，省略号处的程序段应该是_____。
A：For i=0 to 5-12
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next
B：For i=0 to 5
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next
C：For i=0 to 5\2
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next
D：For i=1 to 52
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next
答案：C
等级：3 难度：3
知识点：VB知识点/数组应用举例
190、在窗体上画一个名称为Command1的命令按钮，然后编写如下代码：
Option Base 1
Private Sub Command1_Click()
d=0
c=10
x=Array(10, 12, 21, 32, 24)
For i= 1 To 5
If x(i) > c Then
d =d+x(i)
c=x(i)
Else
d=d-c
End If
Next i
End Sub
程序运行后，如果单击命令按钮，则在窗体上输出d的内容为______。
A：89
B：99
C：23
D：77
答案：C
等级：3 难度：3
知识点：VB知识点/数组应用举例
191、以下有关数组定义的语句序列中，错误的是_____。
A：Static arrl(3)
arrl(1)=100
arrl(2)="Hello"
arrl(3)=123、45
……
End Sub
B：Dim arr2() As Integer
Dim size As Integer
Private Sub Command2_Click()
size=Input Box("输入:")
ReDim arr2(size)
C：Option Base 1
Private Sub Command3_Click()
D
im arr3(3) As Integer
……
End Sub
D：Dim n As Integer
Private Sub Command4_Click()
Dim arr4(n) As Integer
……
End Sub
答案：D
等级：3 难度：3
知识点：VB知识点/数组的定义和引用
192、以下定义数组或给数组元素赋值的语句中，正确的是_____。
A：Dim a As Variant
a=Array(1,2,3,4,5)
B：Dim a(10) As Integer
a=Array(1,2,3,4,5)
C：Dim a%(10)
a(1)="ABCDE"
D：Dim a(3),b(3) As Integer
a(0)=0
a(1)=1
a(2)=2
b=a
答案：A
等级：2 难度：2
知识点：VB知识点/数组的定义和引用
193、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Option Base 1
Private Sub Command1_Click()
Dim a
a= Array(1,2,3,4,5)
For i=1 To UBound(a)
a(i) = a(i)+i-1
Next
End Sub
程序运行后，单击命令按钮，则在窗体上显示a(3)的内容是______。
A：4
B：5
C：6
D：7
答案：B
等级：2 难度：2
知识点：VB知识点/数组应用举例
194、阅读程序
Option Base 1
Private Sub Form_Click()
Dim arr,Sum
Sum = 0
arr = Array(1,3,5,7,9,11,13,15,17,19)
For i=1 To 10
If arr(i)/3 = arr(i)\3 Then
Sum = Sum + arr(i)
End If
Next i
End Sub
程序运行后，单击窗体，输出Sum的结果为______。
A：13
B：14
C：27
D：15
答案：C
等级：3 难度：3
知识点：VB知识点/数组应用举例
195、在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Option Base 1
Private Sub Command1_Click()
Dim a As Variant
a=Array(1,2,3,4,5)
Sum=0
For i=1 To 5
Sum = sum+a(i)
Next i
x=Sum/5
For i =1 To 5
If a(i)>x Then Print a(i);
Next i
End Sub
程序运行后，单击命令按钮，在窗体上显示的内容是______。
A：1 2
B：1 2 3
C：3 4 5
D：4 5
答案：D
等级：3 难度：3
知识点：VB知识点/数组应用举例
196、关于ReDim语句，错误的是______。
A：ReDim语句只能出现在过程中
B：与Dim不同，ReDim是一个可执行语句
C：ReDim的作用是声明动态数组
D：ReDim的作用是给动态数组分配实际的元素个数
答案：C
等级：3 难度：3
知识点：VB知识点/静态数组与动态数组
197、InputBox函数返回值的类型为______。
A：数值
B：字符串
C：变体
D：逻辑
答案：B
等级：1 难度：1
知识点：VB知识点/常用内部函数
198、要分配一个3×3的单精度类型的数组，正确的数组声明语句是______。
A：Dim a(9) As Single
B：Dim a(-1 To 1,-5 To -3) As Single
C：Dim a(3,3) As Single
D：Dim a(-3 To 1,-5 To 7) As Single
答案：B
等级：2 难度：2
知识点：VB知识点/数组的定义和引用
199、假定通过复制，粘贴建立了1个命令按钮数组Com