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

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

admin2018-10-15  43
问题 在窗体上画一个命令按钮，然后编写如下事件过程：
    Private Sub Commandl_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
解析 本题考查的考点是有关随机数和退出语句的。在本题中，首先在循环中生成一个随机数，由于Rnd函数可以生成0～1开区间的数，所以Int(Rnd*100)能够生成0～99之间的整数，随后对此数进行判断，当随机数为12时退出内循环；当随机数为58时退出外循环；当随机数为65、68或92时将会结束整个窗体的运行。本题中的循环次数受随机数控制，所以次数不定。
转载请注明原文地址:https://www.kaotiyun.com/show/EFFp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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