单选题 在窗体上画一个命令按钮,然后编写如下事件过程:
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
Cuse 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
【答案解析】[考点] 多分支控制结构和For循环 [解析] 本题考查的考点是有关随机数和退出语句的。在本题中,首先在循环中生成一个随机数,由于Rnd函数可以生成0~1开区间的数,所以Int(Rnd*100)能够生成0~99之间的整数,随后对此数进行判断,当随机数为12时退出内循环;当随机数为58时退出外循环:当随机数为65、68或92时将会结束整个窗体的运行。本题中的循环次数受随机数控制,所以次数不定。