问题 单项选择题

在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim I,Num
Randomize
Do
For I=1 To 1000
Num=Int(Rnd*100)
Print Num;
SelectCase Num
Case 15
Exit For
Case 50
Exit Do
Case 62,66,90
End
End Select
Next 1
Loop
End Sub
上述事件过程执行后,下列描述中正确的是______。

A) Do循环执行的次数为1000次
B) 当所产生的随机数为15时结束所有循环
C) 在For循环中产生的随机数小于或等于100
D) 当所产生的随机数为62、66或90时窗体关闭、程序结束

答案

参考答案:D

解析: 根据给出的程序,当Num值为15时,跳出For循环,并不是结束程序;当Num值为50时,跳出Do循环;当Num值为62,66,90时,执行End语句结束程序。

选择题
单项选择题