单选题
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim I,Num
Randomize
Do
For I=1 To 1000
Num=Int(Rnd*100)
Print Ntim;
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循环中嵌套了For循环,Do循环没有设置结束条件,而是在For循环体中的Select语句中设置了退出Do循环和For循环及结束程序的分支,因此Do循环的次数无法确定。随机函数Rnd产生[0,1)之间的一个数,包括0但不包含1,因此Rnd*100的范围是大于等于0小于100。随机数为65、68或92时结束程序,关闭窗体,为58时退出Do循环,为12时退出For循环进入下一次Do循环。
提交答案
关闭