(16) 执行x$=InputBox("请输入x的值") 时,在弹出的对话框中输入123,在列表框List1选中1个列表项(数据为456) ,使有的值使123456的语句是
A) y=x$+List1.List(0)
B) y=x$+List1.List(1)
C) y=Val(x$) +Val(List1.List(0) )
D) y=Val(x$) & Val(List1.List(1) )
(17) 以下各项中,Visual Basic不能接收的图形文件是
A) .ico文件
B) .jpg文件
C) .psd文件
D) .bmp文件
(18) 下面的属性中,用于自动调整图像框中图形内容的大小的是
A) Picture
B) CurentY
C) CurrentX
D) Stretch
(19) 下面有关注释语句的格式,错误的是
A) Rem注释内容
B) ′注释内容
C) a=3:b=2 ′对a、b赋值
D) Private Sub Command1_MouseDown(button As Integer , shift As Integer , _ Rem 鼠标按下事件的命令调用过程 X As Single ,Y As Single)
(20) 只有将组合框的Style属性设置为何值时,才能触发DblClick事件?
A) 0
B) 1
C) 2
D) 3
(21) 以下属于Visual Basic合法的数组元素是
A) x8
B) x[8]
C) s(0)
D) v[8]
(22) 编写如下两个事件过程:
Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer)
Print Chr(KeyCode)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub
在一般情况下(即不按住Shift键和锁定大写键时) 运行程序,如果按"A"键,则程序输出的结果是
A) A
a
B) a
A
C) A
A
D) a
a
(23) 要使菜单项MenuOne在程序运行时失效,使用的语句是
A) MenuOne.Visible=True
B) MenuOne.Visible=False
C) MenuOne.Enabled=True
D) MenuOne.Enabled=False
(24) 在窗体上建立通用对话框需要添加的控件是
A) Data控件
B) From控件
C) CommonDialog控件
D) VBComboBox控件
(25) 在Visual Basic中,要将一个窗体加载到内存进行预处理但不显示,应使用的语句是
A) Load
B) Show
C) Hide
D) Unload
(26) 运行下列程序段后,显示的结果为
J1=23
J2=32
If J1<J2 Then Print J2 Else Print J1
A) 23
B) 32
C) 55
D) 2332
(27) 下列语句正确的是
A) If A≠B Then Print "A不等于B"
B) If A<>B Then Printf "A不等于B"
C) If A<>B Then Print "A不等于B"
D) If A≠B Print "A不等于B"
(28) 下面语句正确的是
A) If x<3y And x>y Then y=x^3
B) If x<3y And x>y Then y=3x
C) If x<3y:x>y Then y=x^3
D) If x<3y And x>y Then y=x* *3
(29) 计算z的值,当x大于y时,z=x;否则z=y。下列语句错误的是
A) If x>=y Then z=x : z=y
B) If x>=y Then z=x Else z=y
C) z=y : If x>=y Then z=x
D) If x<=y Then z=y Else z=x
(30) 下列程序段执行结果为
x=5
y=-6
If Not x>0 Then x=y-3 Else y=x+3
Print x-y; y-x
A) -3 3
B) 5 -9
C) 3 -3
D) -6 5