问题
单项选择题
在窗体中添加一个名称为Command1的命令按钮、一个名称为Label1的标签，编写如下代码：
Option Base 1
Private Sub Command1_Click( )
a=Array(23，34，25，46，35)
┊ End Sub
过程的功能是求数组a中是奇数的元素的个数，并把结果显示在标签中。为实现此功能，省略号处的程序段应该是
A．For i=0 T0 4
If a(i)Mod 2＜>0 Then
b=b+1
End lf
Next i
Label1.Caption=b
B．For i=0 To 4
If a(i)Mod2=0 Then
b=b+1
End lf
Next i
Label1.Caption=b
C．For i=1 To 5
If a(i)Mod 2 ◇Then
b=b+1
End lf
Next i
Label1.Caption=b
D．For=0 To 5
If a(i)Mod 2=0 Then
b=b+1
End lf
Next i
Label1.Caption=b
答案
参考答案：C
解析： 由于“Option Basel”，故数组下标下界为1，所以可以据此排除A、B、 D，答案为C。同时要注意If的控制条件为“a(i)Mod2＜>o”，表示当a(i)为奇数时。