在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim I,Num Randomize Do For I=1 To 1000 Num=Int(Rnd*100) PrintNum; SelectCas

admin2009-08-25  37

问题 在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Commandl_Click()
Dim I,Num
Randomize
Do
For I=1 To 1000
Num=Int(Rnd*100)
PrintNum;
SelectCase Num
Case 12
Exit For
Case 58
Exit Do
Case 65,68,92
End
End Select
NextI
Loop
End Sub
上述事件过程执行后,下列描述中正确的是

选项 A、Do循环执行的次数为1000次
B、在For循环中产生的随机数小于或等于100
C、当所产生的随机数为12时结束所有循环
D、当所产生的随机数为65、68或92时窗体关闭、程序结束

答案D

解析 根据给出的程序。当Num值为12时,跳出For循环,并不是结束程序;当Num值为58时,跳出Do循环;当Num值为65,68,92时,执行“end ”语句结束程序。
转载请注明原文地址:https://kaotiyun.com/show/6c1p777K
0

最新回复(0)