精编2019VisualBasic程序设计期末考试题库200题(含答案)

2019年Visual Basic 程序设计期末测试复习题200题
[含答案]
一、选择题
1．若要使标签透明，则可使用的属性是_______。

a) BackColor
b) BackStyle
c) BorderStyle
d) ForeColor 答案：B
2．在Visual Basic设计界面中不能隐藏的窗口是______。

a) 工程窗口
b) 属性窗口
c) 立即窗口
d) 窗体窗口答案：A
3．整型数的取值范围为______。

a) –32767～+32767
b) –32768～+32767
c) –32768～+32768
d) 0～65535 答案：B
4．在程序中使用日期型数据时，必须用符号____将日期型数据括起来。

a) @
b) $
c) %
d) # 答案：D
5．下列选项中，哪一项是所有控件共有的属性_______。

a) Caption
b) Value
c) Text
d) Name 答案：D
6．下列数据中哪一个是布尔常量_______。

a) 123
b) not
c) TRUE
d) xyz 答案：C
7．运行VB程序的快捷键为_______。

a) F4
b) F5
c) F6
d) F7 答案：B
8．若要以代码方式设置在文本框中显示文本的字体大小，则可用文本框的______属性来实现。

a) FontName
b) Font
c) FontSize
d) FontBold 答案：C
9．下列程序段的执行结果是_____。

N=10
For k=n To 1 Step-1
x=Sqr(k)
x=x-2
Next k
Print x-2
a) -3
b) -1
c) 1
d) 1.16 答案：A
10．下列_______属性用于设置或返回文本框中的文本。

a) Caption
b) Text
c) Name
d) DragIcon 答案：B
11．当复选框设置为图片风格时，下列_______属性可以在复选框被选中时显示图形。

a) DisabledPicture
b) DownPicture
c) Picture
d) Image 答案：B
12．若要在列表框中显示多列数据，可用列表框的______属性来实现。

a) MultiSelect
b) Index
c) Columns
d) List 答案：C
13．在Visual Basic环境下，当写一个新的Visual Basic 程序时，所做的第一件事是________。

a) 编写代码
b) 新建一个工程
c) 打开属性窗口
d) 进入VB环境答案：B
14．要在C盘当前文件夹下建立一个名为Sd.dat的顺序文件，应先使用_____语句。

a) Open "Sd.dat" For Output As #1
b) Open "C：Sd.dat" For Input As #1
c) Open "C：Sd.dat" For Output As #1
d) Open "Sd.dat" For Input As #1 答案：C
15．下列是一个循环结构的程序，循环体内的语句将执行_____次。

K=0
For I=1 to 10
For j=1 to 100
K=K+1
Next j
Next I
a) 0
b) 10
c) 100
d) 1000 答案：D
16．在Visual Basic程序设计中，过程名称的长度不能超过_______个字符。

a) 8
b) 40
c) 255
d) 11 答案：B
17．8.6787E+8写成普通的十进制数是_______。

a) 86787000
b) 867870000
c) 8678700
d) 8678700000 答案：B
18．若要使标签控件显示时，不覆盖其背景内容，应设置标签控件的（)属性
a) BACKCOLOR
b) BORDERSTYLE
c) FORECOLOR
d) BACKSTYLE 答案：D
19．用于设定文本框中最多可接受的字符数的属性是______。

a) AutoSize属性
b) PasswordChar属性
c) SelLength属性
d) MaxLength属性答案：D
20．单精度浮点数占用的字节数为______。

a) 2个字节
b) 3个字节
c) 4个字节
d) 8个字节答案：C
21．改变驱动器列表框的Drive属性值将激活_____事件。

a) Change
b) Scroll
c) KeyDown
d) KeyUp 答案：A
22．Datetime是Date类型的变量，以下赋值语句中错误的是：_______。

a) Datetime=#4/14/97#
b) Datetime=#May 1,1997#
c) Datetime=#12:15:00AM#
d) Datetime="8\8\99" 答案：D
23．对话框在关闭前，不能继续执行应用程序的其他部分，这种对话框称为_______。

a) 输入对话框
b) 输出对话框
c) 模态对话框
d) 非模态对话框答案：C
24．写列选项中，合法的变量是______。

a) c%aaa
b) sum_3
c) Else
d) 5persons 答案：B
25．数组Dim D(3, 1 To 10, 1 To 15)共有元素________。

a) 100
b) 600
c) 30
d) 450 答案：B
26．可以通过_____来删除列表框中的选择项。

a) Enable属性
b) RemoveItem方法
c) AddItem方法
d) Text属性答案：B
27．下列______语句可以将变量A、B的值互换。

a) A=B:B=A
b) C=A:A=B:B=C
c) A=C:C=B:C=A
d) B=A:A=B 答案：B
28．以下程序段执行后整型变量n 的值为_____。

N=0
for I=1 to 20 step 5
n=n+1
next I
a) 3
b) 4
c) 5
d) 2 答案：B
29．以下哪个是合法的变量名_______。

a) Len
b) Test@qw
c) 6cost_1
d) count2s 答案：D
30．以下程序段的执行结果是_____。

X=2:y=1
If x*y<1 Then
y=y-1
Else
y=-1
Print y-x>0
End If
a) Ture
b) False
c) -1
d) 1 答案：B
31．下列程序运行后，变量s的值为______。

J=0:s=0
For I=1 To 4
j=j+I
s=s+j
Next I
a) 20
b) 10
c) 5
d) 15 答案：A
32．下列结构中不属于循环结构的是______。

a) for/next
b) while/wend
c) With/end with
d) do/loop 答案：C
33．当程序运行时，在窗体上单击鼠标，以下_______事件是窗体不会接收到的。

a) MouseDown
b) MouseUp
c) Load
d) Click 答案：C
34．设在窗体上有两个命令按钮，其中一个命令按钮的名称为cmda，则另一个命令按钮的名称不能是（)
a) cmdc
b) cmdb
c) cmdA
d) Command1 答案：c
35．下列_______方法是将项目添加到List控件中。

a) List
b) ListCount
c) Move
d) AddItem 答案：D
36．能够改变窗体边框线类型的属性是（ )
a) FontStyle
b) BorderStyle
c) BackStyle
d) Border 答案：B
37．下列各种窗体事件中，不能由用户触发的事件是（ )
a) Load事件和Unload事件
b) Click事件和Unload事件
c) Click事件和Dbclick事件
d) Load事件和Initialize事件答案：D
38．将任意一个正的两数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) 答案：A
39．表达式2+3*4^5-SIN（X+1)/2中最先进行的运算是?
a) 4^5
b) 3*4
c) x+1
d) SIN 答案：C
40．设A、B、C表示三角形的3条边，表示条件“任意两边之和大于第三边”的布尔表达式可以用（???)表示。

a) A+B>=C Or A+C>=B Or B+C>=A
b) Not(A+B<=C Or A+C<=B Or B+C<=A)
c) A+B>C And?A+C>B And B+C>A
d) A+B>=C And A+C>=B Or B+C>=A 答案：B
41．要在图片框P1中打印字符串“How Are You”，应使用语句（)
a) Picture1.Print=“ How Are You”
b) P1.Picture=LoadPicture(“How Are You”)
c) P1.Print“How Are You”
d) Print “How Are You”答案：C
42．窗体设计器是用来设计( )
a) 应用程序的代码段
b) 应用程序的界面
c) 对象的属性
d) 对象的事件答案：B
43．引用列表框的最后一项应使用（)
a) List1.List(List1.ListCount-1)
b) List1.List(List1.ListCount)
c) List1.List(ListCount)
d) List1.List(ListCount-1) 答案：A
44．下列哪项是窗体对象的方法而不是属性（)
a) Name
b) Print
c) Caption
d) Enabled 答案：B
45．除时钟外其它控件都没有的属性是
a) Top
b) Name
c) Visible
d) Interval 答案：D
46．叹釘哏
说法不正确的是
a) 必须是字母开头，不能是数字或其他字符
b) 不能用Visual Basic 保留字
c) 可以包含字母、数字、下划线和标点符号
d) 不能超过255个字符答案：C
47．VB应用程序的运行模式是
a) 解释运行模式
b) 编译运行模式
c) 两者都有
d) 汇编模式答案：C
48．语句PRINT?“SGN（-26)=”；SGN（-26)的输出结果为
a) SGN（-26)=26
b) SGN（-26)=-26
c) SGN（-26)=+1
d) SGN（-26)=-1 答案：D
49．下列语句中正确的是
a) txt1.text+txt2.text=txt3.text
b) =cmdok
c) 12label.caption=1234
d) a=inputbox(hello) 答案：D
50．设A=”abcdefghijklm”，下面（)的函数值为”jklm”。

?
a) Mid(A,10,4)
b) Ringht(A,5)
c) Ringht(A,1,4)
d) Left(A,10,4) 答案：A
51．表达式Int(-17.8)+Sgn(17.8)的值是______。

a) 18
b) -17
c) -18
d) -16 答案：B
52．在Visual Basic 中，称对象的数据为：______。

a) 属性
b) 方法
c) 事件
d) 封装答案：A
53．下列控件中可自动设置滚动条的是________。

a) 复选框
b) 框架
c) 列表框
d) 标签框答案：C
54．命令按钮Command1 的Caption属性为“退出（x)”，要将命令按钮的快捷键设为Alt+x,应修改Caption属性为_________。

a) 在x前插入&
b) 在x后插入&
c) 在x前插入 #
d) 在x后插入# 答案：A
55．某顶级菜单项的热键字母为F，以下_____操作等同于单击该菜单项。

a) 同时按下Ctrl+F键
b) 按下F键
c) 同时按下Alt+F键
d) 同时按下Shift+F键答案：C
56．下面的运算符中，优先级别最高的是_____。

a) AND
b) *
c) 〉=
d) & 答案：B
57．表达式25.26 MOD 6.98的值是_____。

a) 1
b) 5
c) 4
d) 提示错误信息答案：C
58．将字符串“hello”添加到列表框的最后，可使用（)请语句。

a) List1.AddItem“hello”,List1.ListCount-1
b) List1.AddItem“hello”,List1.ListCount+1
c) List1.AddItem“hello”,List1.ListIndex
d) List1.AddItem“hello”答案：D
59．如果x是一个正实数，对x的第二位小数四舍五入的表达式是_____。

a) 0.1*Int(x+0.05)
b) 0.1*Int(10*(x+0.05))
c) 0.1*Int(100*(x+0.5))
d) 0.1*Int(x+0.5) 答案：B
60．在visual basic中，要将一个窗体从内存中释放，应使用______语句。

a) show
b) hide
c) load
d) unload 答案：D
61．在VB6.0中，12345678的类型中是______。

a) 整数型
b) 长整数型
c) 字符串型
d) 日期型答案：B
62．要使一个文本框具有水平和垂直流动条，则应先将其Muliline属性设值为True,然后再
将Scrollbar属性设值为_____。

a) 0
b) 1
c) 2
d) 3 答案：D
63．如果有声明Option base 1 dim arr(3,3),则该数组共有_____个元素。

a) 16
b) 9
c) 4
d) 6 答案：B
64．下列对象中没有焦点属性的是（???)
a) 命令按钮控件
b) 窗口控件
c) 文本框控件
d) 单选框控件答案：B
65．文本框控件中将Text的内容全部显示为所定义的字符的属性项是（?? )
a) PasswordChar
b) 需要编程来实现
c) Password
d) 以上都不是答案：A
66．要清除组合框Combol中的所有内容，可以使用( )语句
a) Combo1.ClS
b) Combo1.Clear
c) Combo1.Delete
d) Combo1.Remove? 答案：B
67．要使一个命令按钮成为图形命令按钮，则应首先设置_____属性值。

a) Picture
b) Style
c) Downpicture
d) Disabledpicture 答案：B
68．不能作为容器的对象是_____。

a) 窗体
b) 框架
c) 图片框
d) 图像框答案：D
69．下列程序段运行后，输出结果是____。

B=1
Do until b>7
b=b*(b+1)
Loop
Print b
a) 7
b) 39
c) 42
d) 1 答案：C
70．15.5\2的结果是_____。

a) 1
b) 1.5
c) 7
d) 8 答案：D
71．a和b中有且只有一个为0，可以用以下表达式来表示_____。

a) a=0 or b=0
b) a=0 Xor b=0
c) a*b=0 And a+b<>0
d) a=0 And b=0 答案：B
72．dim a(-3 to 3)所定义的数组元素个数是_____。

a) 6
b) 7
c) 8
d) 9 答案：B
73．Double类型的数据由_____个字节组成。

a) 21
b) 4
c) 8
d) 16 答案：C
74．语句Print 5*5/5的输出结果是________。

a) 5
b) 25
c) 0
d) 5*5/5 答案：A
75．表达式X+1>X是_____。

a) 算术表达式
b) 非法表达式
c) 字符串表达式
d) 关系表达式答案：D
76．复选对象是否被选中，是由其_____属性决定的。

a) Checked
b) Value
c) Enabled
d) Selected 答案：B
77．窗体的 BackColor 属性用于设置窗体的______。

a) 高度
b) 亮度
c) 背景色
d) 前景色答案：C
78．若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
79．确定一个窗体大小的属性是_____。

a) Width和Height
b) Width和Top
c) Top和Left
d) Top和Height 答案：A
80．能显示窗体的方法是______。

a) Visible
b) show
c) Hide
d) open 答案：B
81．Visual Basic主要用于______。

a) 图像处理
b) 文字处理
c) 制作视频文件
d) 开发应用程序答案：D
82．若要将窗体从内存中卸载出去，应该使用的方法是______。

a) Show
b) UnLoad
c) Load
d) Hide 答案：B
83．Inputbox()函数的返回值类型为_____。

a) 数值型
b) 字符型
c) 逻辑型
d) 变体型答案：B
84．执行下列程序段后，整型变量c的值为___。

A=24
b=328
select case b\10
case 0
c=a*10+b
case 1 to 9
c=a*100+b
case 10 to 99
c=a*1000+b
end select
a) 537
b) 2427
c) 24328
d) 240328 答案：C
85．当变量x=2,y=5时，以下程序的输出结果为____。

Do until y>5
x=x*y
y=y+1
loop
print x
a) 2
b) 5
c) 10
d) 20 答案：C
86．下列程序的运行后s的值是_____。

For x=99 to 1 Step -2
s=s+x
Next x
Print s
a) 100
b) 500
c) 2500
d) 5000 答案：C
87．下列程序的执行结果是____。

K=0
For I=1 To 3
a=I^I^K
print a;
Next I
a) 1 1 1
b) 1 2 3
c) 0 0 0
d) 1 4 9 答案：A
88．下列程序的执行结果是_____。

Dim a(5) As String
Dim b As Integer
Dim I As Integer
For I =0 To 5
a(I)=I+1
Print a(I)
Next I
a) 123456
b) 6
c) 654321
d) 0 答案：A
89．下列程序的执行结果为_____。

A=100:b=50
If a>b Then
a=a-b
Else
b=b+a
End if
Print a
a) 50
c) 200
d) 10 答案：A
90．下列程序的执行结果为________。

Dim intsum As Integer
Dim I As Integer
intsum=0
For I=0 To 50 Step 10
intsum=intsum+I
Next I
Print intsum
a) 150
b) 200
c) 50
d) 0 答案：A
91．下列程序段的执行结果为______。

K=0
For J=1 to 2
For I = 1 to 3
K =I+1
Next I
For I = 1 to 7
K = K+1
Next I
Next J
Print K
a) 10
b) 6
c) 11
d) 16 答案：C
92．执行下列程序后，变量a的值为____。

Dim I as integer
dim a as integer
a=0
for I=0 to 100 step 2
a=a+1
next I
a) 1
b) 10
c) 51
d) 100 答案：C
93．_____控件可以使用SetFocus()方法。

a) Frame
b) Label
c) TextBox
d) Timer 答案：C
94．执行完下面的程序段后，循环将执行____次。

For I=1.7 To 5.9 Step 0.9
a=a+1
Print a
Next I
a) 3
b) 4
c) 5
d) 6 答案：C
95．下列运算结果中，值最大的是 ______。

a) 3\4
b) 3/4
c) 4 mod 3
d) 3 mod 4 答案：D
96．以下不属控件的一项是_____。

a) 文本框
b) 标签框
c) 列表框
d) 消息框答案：D
97．______对象不能响应Click事件。

a) 列表框
b) 图片框
c) 窗体
d) 计时器答案：D
98．变量X=32769，则变量声明时不能将其声明为_____。

a) Integer
b) Variant
c) Long
d) Single 答案：A
99．通常，文本框的Setfocus方法不能使用在______事件中。

a) Form_click
b) Form_load
c) Command_click
d) Label_click 答案：B
100．有如下程序：
For I=1 To 3
For j=5 To 1 Step -1
Print I+j
Next j
NEXT I
其循环执行的次数为______。

a) 12
b) 13
c) 14
d) 15 答案：D
101．如果ABC的值为100，下列表达式中，_____的值为False。

a) ABC
b) 12345<>12345 & ABC
c) Not 2*5=10
d) 4=4 and 5>2+2 答案：C
102．Visual basic采用了_____编程机制。

a) 面向过程
b) 面向对象
c) 事件驱动
d) 可视化答案：C
103．命令Picture.Cirle(500,800),800能够在图片框Picture中画出的图形是_______。

a) 半径为sin的椭圆
b) 细而高的椭圆
c) 扁而平的椭圆
d) 圆心在（500，800)的一个圆弧答案：D
104．使用驱动器列表框的_____属性可以返回或设置磁盘驱动器的名称。

a) ChDrive
b) Drive
c) List
d) ListIndex 答案：B
105．通过文本框的______属性可以获得当前插入点所在的位置。

a) Position
b) SelStart
c) SelLength
d) Left 答案：B
106．下列哪一个是正确的变量名______。

a) $abc
b) Int
c) 141abc
d) abcf 答案：D
107．下列能正确产生[1-30]之间的随机整数的表达式是______。

a) 1+rnd(30)
b) 1+30*rnd()
c) rnd(1+30)
d) int(rnd()*30)+1 答案：D
108．设a=2,b=3,c=4,d=5,下列表达式a=b<>c=d的值是______。

a) 1
b) Ture
c) False
d) -1 答案：C
109．将命令按钮Command1设置为不可见，应修改该命令按钮的_______属性。

a) Visible
b) Value
c) Caption
d) Enabled 答案：A
110．要输出简单信息，可以使用_____。

a) InputBox函数
b) MsgBox函数
c) ShowFont方法
d) Show Printer方法答案：B
111．下列的程序段执行后，X的值为____。

X=0
for I=1 to 10
for j=I to 10
x=x+1
next j
next I
a) 50
b) 55
c) 100
d) 105 答案：B
112．下面的运算符中，哪个是关系运算符______。

a) Not
b) mod
c) <>
d) & 答案：C
113．下面四个选项，不是事件的是______。

a) Click
b) Visibale
c) Unload
d) Change 答案：B
114．下面的运算符中，哪个是算术运算符_______。

a) Mod
b) =
c) Eqv
d) Xor 答案：A
115．在Visual Basic中通过______属性设置字体颜色。

a) Fontcolor
b) Forecolor
c) Backcolor
d) Showcolor 答案：B
116．在Visual Basic设计界面中不能隐藏的窗口是______。

a) 工程窗口
b) 属性窗口
c) 立即窗口
d) 窗体窗口答案：A
117．以下不是VB对象属性的一项是_____。

a) Click
b) Name
c) Caption
d) Top 答案：A
118．菜单控件仅支持以下________事件。

a) Click
b) MouseDown
c) KeyPress
d) Load 答案：A
119．设执行以下程序段时依次输入1、3、5，执行结果为_____。

Dim a(4) As Integer
Dim b(4) As Integer
For K =0 To 2
a(K+1) =Val(InputBox(“请输入数据："))
b(3-K) =a(K+1)
Next K
Print b(K)
a) 1
b) 3
c) 5
d) 0 答案：A
120．数学式子sin25°写成Visual Basic表达式是_____。

a) sin25
b) Sin(25)
c) Sin(25*3.14/180)
d) sin(25°) 答案：C
121．设定文本框中是否可以接受多行文本用_____属性。

a) MaxLength
b) ToolTipText
c) Multiline
d) Tag 答案：C
122．以下控件中没有Caption属性的是_____。

a) 标签框
b) 文本框
c) 框架
d) 命令按钮答案：B
123．当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的______。

a) AutoSize属性
b) Resize事件
c) AutoRedraw属性
d) Stretch方法答案：B
124．可变数组的各个数组元素的数据类型可以______。

a) 相同
b) 不相同
c) 两可
d) 都不对答案：A
125．逻辑表达式Not"a">"b"And 9<3 Or 9>3的值为______。

a) True
b) False
c) 表达式有错
d) 条件不足答案：A
126．使图形能自动按控件大小而改变的控件是______。

a) 标签框
b) 框架
c) 图片框
d) 图像框答案：D
127．对象可以识别和响应的某些行为称为_____。

a) 属性
b) 方法
c) 继承
d) 事件答案：D
128．若要将某命令按钮设置为默认命令按钮。

则应设置为True的属性是_____。

a) Value
b) Cancel
c) Default
d) Enabled 答案：C
129．双击窗体中的对象后，Visual Basic将显示的窗口是_____。

a) 项目（工程)窗口
b) 工具箱
c) 代码窗口
d) 属性窗口答案：C
130．下列字符串不能作为VB的变量名是______。

a) ABCDEFG
b) P000000
c) 89TWDDFF
d) XYZ 答案：C
131．下拉式组合框的Style属性值为_____。

a) 0
b) 1
c) 2
d) 3 答案：A
132．下列逻辑运算结果为"true"的是________。

a) false or not true
b) false and not true
c) true or not true
d) true and not true 答案：C
133．以下______控件不能触发Dbclick()事件。

a) Label
b) Commandbutton
c) PictureBox
d) Image 答案：B
134．若要设置文本框中所显示的文本颜色，使用的属性是______。

a) BackColor
b) FillColor
c) ForeColor
d) BackStyle 答案：C
二、填空题
135．下面程序段执行后的结果是_____。

X=10
For I=6.3 to 4.9 Step -0.3
x=x-1
Next
Print x 答案：5
136．窗体中有图片框(Picture1)和计时器(Timer1)两个控件，运行程序时，
将图片加载到图片框中，然后图片框以每1秒钟一次的速度向窗体的右下脚移动，每次向左、向下移动150twip。

请填空：
Private Sub Form_load( )
（1) =loadPicture(“c:\pic\ball.ico”)
（2) .Interval= (3)
End Sub
Private Sub Timer1_Timer( )
Static x , y As Integer
x=x+150
y= (4)
Picture1.Move （5)
End Sub
答案: (1) picture1.picture (2) Timer1 (3) 1000 (4) y+150 (5) x,y
137．下面程序段的输出结果是______。

For X=1.5 To 5 Step 5
Print X;
Next X 答案：1.5
138．执行下面的程序段后，b的值为_____。

a=300:b=20
a=a+b:b=a-b:a=a-b 答案：
139．Visual Basic 的对象是________和_______的总称。

答案：窗体#控件
140．方法是VB提供的一种，用来完成一定的操作。

答案：特殊子程序
141．表达式32/2^3-3*2^2+4^2的值是_______。

答案：8
142．下列程序段的运行后t的值为______。

Dim t,k as single
k=5 : t=1
do While k>=-1
t=t*k : K=K-1
loop 答案：0
143．有数组定义语句：dim I(99,99) as Integer，则数组I中共包含有______个元素。

答案：10000
144．下列程序的执行结果是_______。

A = 75
If a>60 Then
I = 1
ElseIf a>70 Then
I = 2
ElseIf a>80 Then
I = 3
ElseIf a>90 Then
I = 4
End If
Print I 答案：1
145．设置窗体的属性，可在窗体上显示图片。

答案：Picture
146．程序运行工程中，清除BMP图片框中的图片应使用语句。

答案： cls
147．复选框控件Value属性指示复选框处于____（10)___或禁止状态(暗淡的)中的某一种。

选中
148．如果要将某个菜单项设计为分隔线，则该菜单项的标题应设置为______。

答案：-
149．以下语句的执行结果是____。

I = Format(5459.4, "##,##0.00")
Print I 答案：5,459.40
150．在窗体上画一个命令按钮(其Name属性为CommAnd1)，然后编写如下代码：
Private Sub CommAnd1_Click()
Dim M(10) As Integer
For k=1 To 10
M(k)=12-k
Next k
x=6
Print M(2+M(x))
End Sub
程序运行后，单击命令按钮，输出结果是______。

答案：4
151．当程序开始运行，要求窗体中的文本框呈现空白，则在设计时，应当在此文本框的属性窗口中，把此文本框的____属性设置为空。

答案：TEXT
152．设有数组声明语句：Option base 1 dim A(3,-2 to 1)，则数组A中有_____个元素。

答案：12
153．A=7,B=3,C=4,则表达式 A MOD 3+B^3/C\5的值为____。

答案：2
154．表达式3/6*5的值是_______。

答案：2.5
155．有如下Sub过程:
Sub ind(a As Integer)
Static x As Integer
x = x+a
Print x;
End Sub
以下是调用它的事件过程，程序运行后，单击命令按钮Command1，输出结果为______。

Private Sub Command1_Click()
Ind(2)
End Sub 答案：2
156．货币类型的数据小数点的位置是固定的，精确到小数点后_____位。

答案：4
157．当对窗体中的对象进行_____操作时，Visual Basic 就会显示该对象的代码窗口。

答案：双击
到 15 (总共 103 个记录) 第一页前一页下一页最后一页
158．下列程序的执行结果是____。

T = O : m = 1 : Sum = 0
Do
t = t + m : Sum = Sum + t : m = m + 2
Loop While m <= 9
Print Sum 答案：55
159．一组具有相同名称，不同下标的下标变量称为______。

答案：数组
160．下面程序段的输出结果是_____。

P=0:s=0
Do
p = p+2
s = s+p
Loop While p<11
Print "s="&s 答案：s=42
161．为了能自动放大或缩小图象框中的图形以与图象框的大小相适应,必须把该图象框的Stretch属性设置为______。

答案：TRUE
162．假定当前日期为2002年7月12日，星期六，则执行语句Print day(now)后，输出结果是______。

答案：12
163．在VB中，最主要的两种对象是（3) 和（4) 。

窗体（form) 控件
164．一个程序最多可以有________窗体。

答案：255
165．.34 要选择多个不相邻的控件，按住_______或SHIFT键不放，再单击要选择的控件。

答案：CTRL
166．表达式："1"+"2"="3"的值是_______。

答案：FALSE
167．表达式“12345”<>“12345”&“ABC”的值是_____。

答案：TRUE
168．货币型数据的类型标识符为______。

答案：@
169．激活属性窗口的快捷键是______。

答案：F4
170．给定年份，下列程序用来判断该年是否闰年，请补充完该程序。

提示：闰年的条件是年号可以被4整除但不能被100整除，或者能被400整除。

Private Sub Command6_Click()
Dim y As Integer
y=InputBox("请输入年号")
If(y Mod 4=0______y Mod 100<>0) or (y Mod 400=0) Then
Print "是闰年"
Else Print "是普通年份"
End If
End Sub 答案：AND
三、判断题
171．列表框的listindex返回当前选项的索引号，索引号从0开始。

如果没有选项被选中，该属性为1。

答案：错
172．当用户单击工具栏按钮时，将触发工具栏按钮的ButtonClick事件。

173．要获得当前驱动器应使用驱动器列表框的Dir属性。

答案：错
174．要使文本框在程序运行时不能由用户直接输入数据，应设置文本框的Visible属性设置为False。

答案：错
175．要想改变一个窗体的标题内容，则应该设置Name属性的值。

答案：错
176．在Visual Basic中按文件的访问方式不同，可以将文件分为数据文件和可执行文件。

答案：错
177．在visual basic中，要将一个窗体从内存中释放，应使用load语句。

答案：错
178．在语句Label1.caption="欢迎"被执行之前，标签控件Label1的Caption属性为默认值，则该语句被执行后，标签控件Label1的Name属性和Caption属性的值分别为：“label”、“欢迎”。

答案：错
179．可以用剪切+复制的方法将已有控件放入框架中。

答案：对
180．若要使标签透明，则可使用属性BackColor。

答案：错
181．当滚动条位于最右端或顶端时，表示其值最大，反之为最小。

答案：错
182．滚动条通常用于浏览显示内容、确定位置，也可以作为数据输入的工具。

通过编程控制，可以为不具备滚动能力的控件提供滚动功能。

答案：对
183．计时器（Timer)的Interval属性的取值范围0-65535。

答案：对
184．在Visual Basic设计界面中,工程窗口是不能隐藏的窗口对
3、在菜单编辑器中使用“索引”时，可有一组菜单项具有相同的“名字”。

4、通过改变属性窗口中的Name属性，来改变窗体的标题。

错
5、创建VB应用程序的三个主要步骤是：(1)创建应用程序界面(2)设置控件(3)编写代码。

对
6、变量是指在程序运行过程中其值可以改变的那些量，而值不能改变的是常量。

对
7、已知P＝MsgBox(“Howareyou?"，VbYesNo+VbQuestion，“Hello!”)，变量P是Integer数据类型。

对
8、工程文件的扩展名是 .vbg 。

错
9、VB允许设计和使用用户自己设计的控件。

对
10、OptionButton控件没有DblCliek事件。

对
11、同一条记录中的各数据具有相同的类型。

错
13、ImageList 是一个图像容器控件，可用作工具栏的图像库。

对
17、要是某个命令按钮不起作用，应将该按钮的Enabeld属性设置为False。

对
18、使用数组定义语句：Dim D$（10)，则数组D中各元素的值为空。

对
185．列表框List属性可以得到列表中任何选项的值，它以数组的方式存在。

答案：对
186．在Visual Basic程序设计中,TextBox对象没有Caption属性。

答案：对
187．框架由于是一种辅助性的控件，功能较单一，属性较少所以有name属性,没有caption属性。

答案：错
188．计时器对象不能响应Click事件。

答案：对
189．将命令按钮Command1设置为不可见，应修改该命令按钮的Enabled 属性。

答案：错
190．局部变量在声明它的过程执行完毕后就被释放了。

答案：错
191．局部变量的作用域仅限于声明它的过程。

答案：对
192．3abc为合法变量。

答案：错
193．对象可以识别和响应的某些行为称为事件答案：对
194．方法是由Visual Basic提供的一种专门的子程序，由对象本身所具有，反映该对象功能的内部函数或过程。

对
195．在Visual Basic中通过FontColor 属性来设置字体颜色。

错
196．事件是Visual Basic预先定义的对象能识别的动作。

：对
197．单击滚动条的滚动箭头时，产生的事件是Change。

答案：对
198．标签框有Text属性。

答案：错
199．建立控件时系统自动给控件一个名称，第一个建立的命令按钮名称是Command。

答案：错
200．计时器（Timer)的Interval属性的默认单位为毫秒。

答案：对。