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

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

admin2009-08-25  32
问题 在窗体上画一个命令按钮，然后编写如下事件过程：
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://jikaoti.com/ti/5Qq0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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