窗体中有命令按钮run34 对应的事件代码如下: PrivateSub run34_Enter( ) Dim humAs Integer aAs

窗体中有命令按钮run34，对应的事件代码如下： PrivateSub run34_Enter（） Dim humAs Integer，aAs Integer，b As Integer，i AsInteger For i=1To 10 num=InputBox(”请输入数据：”，”输入”) IfInt(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个数据分别统计整数和非整数的个数

请帮忙给出正确答案和分析，谢谢！