2. 计算机
  3. 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() 　　 Dim I， Num 　　 Randomize 　　 Do 　　　　 For I＝1 To 1000 　　　　　　 Num＝Int(Rnd *

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() 　　 Dim I， Num 　　 Randomize 　　 Do 　　　　 For I＝1 To 1000 　　　　　　 Num＝Int(Rnd *

admin2018-09-19  58
问题 在窗体上画一个命令按钮，然后编写如下事件过程：
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时窗体关闭、程序结束
答案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循环。
转载请注明原文地址:https://jikaoti.com/ti/a8m0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)