问题
单项选择题
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim I,Num
Randomize
DO
For I=1 To 1000
Num=Int(Rnd*100)
Print Num；
Select Case Num
Case 12
Exit For
Case 58
Exit DO
Case 65,68,92
End
End Select
Next I
Loop
End Sub
上述事件过程执行后，下列描述中正确的是( )
A．Do循环执行的次数为1000次
B．在For循环中产生的随机数小于或等于100
C．当所产生的随机数为12时结束所有循环
D．当所产生的随机数为65、68或92时窗体关闭、程序结束
答案
参考答案：D
解析： Do循环用于不知道循环次数的情况，而仅根据循环条件是True或False决定是否结束循环，故选项A错误。
Rnd()函数用于产生一个小于1但大于或等于0的值随机数。Int()函数用于返回一个不大于所给数的最大整数。表达式Int(Rnd*100)可生成一个0～99的随机整数，故选项B错误。
Select Case语旬用于对一个表达式或变量的多个可能值进行判断，从而在一组相互独立的可选语句序列中挑选要执行的语句序列。当产生随机数为12时，结束的应是For循环，故选项C)错误。