问题
单项选择题
窗体上有一个名为Command1的命令按钮，并有如下程序：
Private Sub Command1_Click()
Dim a(10) ,x%
For k=1 To 10
a(K)=Int(Rnd*90+10)
x=x+a(k) Mod 2
Next k
Print x
End Sub
程序运行后，单击命令按钮，输出结果是______。
A) 10个数中偶数的个数
B) 10个数中奇数的个数
C) 10个数中偶数的累加和
D) 10个数中奇数的累加和
答案
参考答案：B
解析： 本题中，Rnd为a(k)产生的随机数为10到100之间的整数(包含10不包含100)，再让该整数对2取余，若为奇数则得1，若为偶数则得0，加0对x没有影响，加1表示有一个奇数，因此，答案为B) 。