窗体中有命令按钮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+l Else b=b+1 End if Next i MsgBox(“运行结果:a=“&Str(a)&”,b=”&Str(b)) End Sub 运行以上事件过程,所完成的功能是( )。