在窗体中有一个命令按钮Command1，对应的事件代码如下：运行以上事件所完成的功能是（ ）。A. 对输入的10个数据求累加和B. 对输入的10个数据求各自的余数，然后再进行累加C. 对输入的10个数据分别统计有几个是整数，有几个是非整数D. 对输入的10个数据分别统计有几个是奇数，有几个是偶数
在窗体中有一个命令按钮Command1，对应的事件代码如下：
运行以上事件所完成的功能是（ ）。
A. 对输入的10个数据求累加和
B. 对输入的10个数据求各自的余数，然后再进行累加
C. 对输入的10个数据分别统计有几个是整数，有几个是非整数
D. 对输入的10个数据分别统计有几个是奇数，有几个是偶数
相关考题：
（ 35 ）在窗体中有一个命令 run35, 对应的事件代码如下：private sub run35_enter()Dim num as integerDim a as integerDim b as integerDim I as integerFor I=1 to 10Num=inputbox( “ 请输入数据： ” , ” 输入 ” ,1)If int(num/2)=num/2 thenA=a+1ElseB =b+1End ifNext IMsgbox( ” 运行结果： a= ” str(a) ” ,b= ” str(b))End sub运行以上事件所完成的功能是A 对输入的 10 个数据求累加和B 对输入的 10 个数据求各自的余数，然后再进行累加C 对输入的 10 个数据分别统计有几个是整数，有几个是非整数D 对输入的 10 个数据分别统计有几个是奇数，有几个是偶数
在窗体中有一个命令按钮run35，对应的事件代码如下： Private Sub run35_Enter() Dim num As Integer Dim a As Integer Dim b As Integer Dim i As Integer For i= 1 To 10 num = InputBox("请输入数据:", "输入", 1) 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个数据分别统计有几个是奇数，有几个是偶数
在窗体中有一个命令按钮Commandl，对应的事件代码如下： Private Sub Commandl_nter() Dim num As Integer Dim a As Integer Dim b As Integer Dim i As Integer For i＝1 To 10 num＝InputBox(“请输入数据：”，“输入”，1)A．:",b＝" Str(B．) End Sub 运行以上事件所完成的功能是( )。C．对输入的10个数据求累加和D．对输入的10个数据求各自的余数，然后再进行累加
在窗体中有一个命令按钮Command1，对应的事件代码如下：Private Sub Command1_Enter()Dim num As IntegerDim a As IntegerDim b As IntegerDim i As IntegerFor i＝1 To 10num＝InputBox("请输入数据："，"输入"，1)If Int(num/2)＝num/2 Thena＝a+1Elseb＝b+1End IfNext iMsgBox("运行结果：a＝" Str(A) :",b＝" Str(B) )End Sub运行以上事件所完成的功能是( )。A．对输入的10个数据求累加和B．对输入的10个数据求各自的余数，然后再进行累加C．对输入的10个数据分别统计有几个是整数，有几个是非整数D．对输入的10个数据分别统计有几个是奇数，有几个是偶数
在窗体中有一个命令按钮run35，对应的事件代码如下： Private Sub run35_Enter( ． Dim num As Integer Dim a As Integer Dim b As Integer Dim i As Integer For i= 1 To 10 num = InputBox("请输入数据:", "输入",1． 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个数据分别统计有几个是奇数，有几个是偶数
在窗体中有一个命令按钮Command1，对应的事件代码如下： Private Sub Command1_Enter() Dim num As Integer Dim a As Integer Dim b As Integer Dim i As Integer For i=1 To 10 num=InputBox("请输入数据：","输入",1) 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个数据分别统计有几个是奇数，有几个是偶数
在窗体中有一个命令按钮Command1，对应的事件代码如下： PrivateSubCommand1_Enter() Dim num As Integer Dim a As Integer Dim b As Integer Dim i As Integer For i=1 To 10 num=InputBox(“请输入数据：”，“输入”，1) If Int(num/2)=num/2Then a=a+1 Else b=b+l End If Next i MsgBox(“运行结果：a=“Str(a)：”，b=”Str(b)) End Sub 运行以上事件所完成的功能是( )。A．对输入的10个数据求累加和B．对输入的10个数据求各自的余数，然后再进行累加C．对输入的10个数据分别统计有几个是整数，有几个是非整数D．对输入的10个数据分别统计有几个是奇数，有几个是偶数
在窗体中有一个命令按钮Commandl，对应的事件代码如下： Pfivate Sub Command l_Ente（ ） Dim nllm As IntegerDim aAs IntegerDim bAs IntegerDim iAs IntegerFori=1 To 10num=InputBox（"请输入数据："，"输入"，l）If Int（num／2）=Iaum／2 Thena=a+lElseb=b+1EndIfNext iMsgBox（"运行结果：a="&；St"A．&；："，b="&；Str（B．）End Sub运行以上事件所完成的功能是（ ）。A.对输入的l0个数据求累加和B.对输人的l0个数据求各自的余数，然后再进行累加C.对输入的10个数据分别统计有几个是整数，有几个是非整数D.对输入的10个数据分别统计有几个是奇数，有几个是偶数
在窗体中有一个命令按钮Commandl，对应的事件代码如下。 Private Sub Commandl_Enter（ ） Dim num As IntegerDim aAs IntegerDimbAsIntegerDim iAs IntegerFori=lT010num=InputBox（请输入数据：，输入，1）IfInt（num／2）=num／2 Thena=a+1Elseb=b+lEndIfNextlMsgBox（运行结果：a=amp；Str（A．amp；：，b=amp；Str（B．）EndSub运行以上事件所完成的功能是（ ）。运行以上事件所完成的功能是（ ）。A.对输入的10个数据求累加和B.对输入的10个数据求各自的余数，然后再进行累加C.对输入的10个数据统计有几个是整数，有几个是非整数D.对输入的10个数据统计有几个是奇数，有几个是偶数