单选题 窗体中有命令按钮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 　　运行以上事件过程，所完成的功能是