在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim i As Integer Dim num As Integer Dim n As Inte

admin2016-06-30  28

问题 在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程:
  Private Sub Commandl_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 hum 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分支时,ExitFor语句为结束循环,故B、C选项均错误。程序通过语句“n=n+1”来统计num为偶数的个数,故A选项正确。
转载请注明原文地址:https://jikaoti.com/ti/F9J0FFFM
0

最新回复(0)