在窗体上添加一个名称为Command1的命令按钮,然后编写如下事件过程:OptionBase1PrivateSubComma
A.空白
B.错误提示
C.绿色
D.白色
A.空白
B.错误提示
C.绿色
D.白色
第1题
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
Print s; a
End Sub
程序运行后,单击命令按钮,则窗体上显示的内容是()。
A.7 9
B.34 0
C.9 7
D.死循环
第2题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim num As Integer num = 1 Do Until num > 6 Print num; num = num + 2.4 Loop End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是()。
A.无数据输出
B.1 3.4 5.8
C.1 4 7
D.1 3 5
第3题
A.15
B.14
C.13
D.12
第4题
A.该对话框被设置为“打开”对话框
B.在该对话框中指定的默认文件名为空
C.该对话框的标题为VBTest
D.在该对话框中指定的默认文件类型为文本文件(*.Txt)
第5题
A.15
B.14
C.13
D.12
第6题
A.25
B.24
C.15
D.10
第7题
A.40
B.30
C.20
D.10
第8题
A.“程序设计”
B.“Visual Basic程序设计”
C.Visual Basic
D.“A程序设计”
第9题
A.4321
B.34
C.1234
D.12
第10题
A.Visible
B.Timer
C.Interval
D.Enabled
第11题
A.Drive1_Change
B.Drive1_Click
C.Dir1_Click
D.Dir1_KeyPress