2. 计算机
  3. 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer Dim num As Integer Dim n As Int

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer Dim num As Integer Dim n As Int

admin2019-07-30  45
问题 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
     Dim i As Integer
     Dim num As Integer
     Dim n As Integer
     n = 0
     Randomize
     For i = 1 To 10
         num = Int(Rnd * 10) + 1
         Select Case num Mod 2
           Case 1
                Exit For
           Case 0
                Print num
                n = n + 1
         End Select
     Next i
     Print "n="; n
End Sub
下面有关描述中正确的是(    )。
选项 A、变量n的作用是累计自过程运行开始到结束所产生的偶数个数
B、当num的值为偶数时，则For循环将被终止
C、程序运行过程中，变量num共被赋值10次
D、num的值是1～11之间的整数
答案A
解析 Rnd为英文Random的简写，中文意随机数。Rnd函数可以产生随机数，当一个应用程序不断地重复使用随机数时，同一序列的随机数会反复出现，用Randomize语句可以消除这种情况。在For循环中，循环变量i初始值为1，终止值为10，循环体语句"num = Int(Rnd * 10) + 1"可以随机产生一个0～9之间的随机整数赋值给变量num。故D选项错误；Select Case语句中根据num mod 2的结果，判断执行哪一个分支，如果num为偶数，则执行Case 0分支，如果num为奇数，则执行Case 1分支，当执行Case 1分支时，Exit For 语句为结束循环，故B、C选项均错误。程序通过语句"n = n + 1"来统计num为偶数的个数，故A选项正确。
转载请注明原文地址:https://kaotiyun.com/show/SpUp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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