ID：9102-10778
在窗体上画一个名称为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）1 3.4 5.8 B）1 3 5 C）1 4 7 D）无数据输出查看解析
ID：9102-10767
设a=10，b=5，c=1，执行语句Print a > b > c后，窗体上显示的是( )
A）True B）False C）1 D）出错信息查看解析
ID：9102-10785
在窗体上画一个名称为Text1的文本框，并编写如下程序：
Private Sub Form_Load()
Show
Text1.Text = ""
Text1.SetFocus
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Print "程序设计"
End Sub
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Print "Visual Basic";
End Sub
程序运行后，如果按"A"键，然后单击窗体，则在窗体上显示的内容是( )
A）Visual Basic B）程序设计
C）A程序设计 D）Visual Basic程序设计
查看解析
ID：9102-10772
设组合框Combo1中有3个项目，则以下能删除最后一项的语句是( )
A）Combo1.RemoveItem Text B）Combo1.RemoveItem 2
C）Combo1.RemoveItem 3 D）Combo1.RemoveItem Combo1.Listcount查看解析
ID：9102-10774
如果要在菜单中添加一个分隔线，则应将其Caption属性设置为( )
A）= B）* C）& D）-查看解析
