在窗体中添加一个名称为Command1的命令按钮、一个名称为Label1的标签,编写如下代码: Option Base 1 Private Sub Command1_Click( ) a=A

admin2009-02-13  64

问题 在窗体中添加一个名称为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

答案4

解析 由于“Option Basel”,故数组下标下界为1,所以可以据此排除A、B、 D,答案为C。同时要注意If的控制条件为“a(i)Mod2<>o”,表示当a(i)为奇数时。
转载请注明原文地址:https://kaotiyun.com/show/GB1p777K
0

最新回复(0)