窗体中有命令按钮run34,对应的事件代码如下。 Private Sub run34_Enter() Dim num As Integer,a As Integer,b As Integer,i As Integer For i=1 To 10 num=InputBox("请输入数据:","输入") If Int(num/2)=num/2 Then a=a+1 Else b=b+1 End If Next i MsgBox("运行结果:a="&Str(a)&",b="&Str(b)) End Sub 运行以上事件过程,所完成的功能是( )。
A) 对输入的10个数据求累加和 B) 对输入的10个数据求各自的余数,然后再进行累加 C) 对输入的10个数据分别统计奇数和偶数的个数 D) 对输入的10个数据分别统计整数和非整数的个数