单项选择题

阅渎下面的程序：
Private Sub Form_Click( )
Dim Check，Counter
Check=True
Counter=0
Do
Do While Counter＜20
Counter=Counter+1
If Counter=10 Then
Check=False
Exit Do
End If
Loop
Loop Until Check=False
Print Counter, Check
End Sub
程序运行后，单击窗体，输出结果为______。

A．15 0
B．20 -1
C．10 True
D．10 False

<上一题目录下一题>

热门试题

单项选择题

窗体上有一个命令按钮Command1和一个列表框List1，其中List1有0、1、2、3、4内容，有下列程序： Private Sub Command1_Click( ) Dim i，s For i=0 To List1.ListCount s=s+List1.List(i) Next i Print s End Sub 程序运行后，单击命令按钮，则窗体上显示的是______。

A．0
B．10
C．01234
D．程序出错

单项选择题

为了在按下Esc键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是______。

A．Value
B．Defauh
C．CanceI
D．Enabled

相关试题