单选题 在窗体上画一个名称为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
【答案解析】解析: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选项正确。