问题 单项选择题

在窗体中添加一个名称为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(Mod 2<>0 Then b=b+1 End lf Next i Label1.Caption=b

B.For i=0 To 4 If a(Mod2=0 Then b=b+1 End lf Next i Label1.Caption=b

C.For i=1 To 5 If a(Mod 2 ◇Then b=b+1 End lf Next i Label1.Caption=b

D.For=0 To 5 If a(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)为奇数时。

选择题
单项选择题