在窗体上画一个命令按钮，然后编写如下事件过程：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时窗体关闭、程序结束

热度🔥359

参考答案：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循环。

复制题目向AI提问

扫码免费计算机二级刷题

2025年计算机等级考试题库

标签

二级VB程序设计

循环

for

结束