网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

窗体中有命令按钮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个数据分别统计整数和非整数的个数


参考答案

更多 “ 窗体中有命令按钮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个数据分别统计整数和非整数的个数 ” 相关考题
考题 ( 34 )在窗体中有一个命令按钮(名称为 run34 ) ,对应的事件代码如下:Private Sub run34_Click( )sum=0For i=10 To 1 Step -2sum=sum+iNext iMsgBox sumEnd Sub运行以上事件,程序的输出结果是( ) 。A ) 10B ) 30C ) 55D )其他结果

考题 在窗体中有一个命令按钮(名称为run34),对应的事件代码如下: Private Sub run 34_Click() sum=0 For i=1 To 10 Step 3 sum=sum+i Next i MsgBox sum End Sub 运行以上事件,程序的输出结果是( )。A.22B.30C.55D.25

考题 在窗体中有一个命令按钮(名称为run34),对应的事件代码如下: Private Sub run34_Click() Sum=0 For i=10 To 1 Step -2 sum=sum+i Next i MsgBox sum End Sub运行以上事件,程序的输出结果是______。A.10B.30C.55D.其他结果

考题 在窗体中有一个名为(Command1的命令按钮,Click事件的代码如下:单击命令按钮后,标签显示的结果是( )。

考题 在已建窗体中有一命令按钮(名为Commandl),该按钮的单击事件对应的VBA代码为:Private SuB command 在已建窗体中有一命令按钮(名为Commandl),该按钮的单击事件对应的VBA代码为:Private SuB commandl_Click()SuBT.Form.RecordSource = “select*From 雇员”End SuB单击该按钮实现的功能是A.使用select命令查找“雇员”表中的所有记录B.使用select命令查找并显示“雇员”表中的所有记录C.将suBt窗体的数据来源设置为一个字符串D.将suBt窗体的数据来源设置为“雇员”表

考题 在窗体中有一个标签Lbl和一个命令按钮Commandl,事件代码如下:打开窗体后单击命令按钮,窗体中显示的内容是( )。A. 4B. 5C. 10D. 40

考题 在窗体中有一个名为run34的命令按钮,事件代码如下: Private Sub run34_Click( ) f1=1 f2=1 For n=3 T0 7 F=f1+f2 f1=f2 f2= f Next n MsgBox f End Sub 打开窗体,单击命令按钮,消息框的输出结果是( )。A.8B.13C.21D.其他结果

考题 在窗体中有一个标签Lbl和一个命令按钮Commandl,事件代码如下。 Option Compare DatabaseDim aAs String*10Private Sub Commandl_Click( ) a="1234"b=Len(A. Me.Lbl.Caption=bEndSub打开窗体后单击命令按钮,窗体中显示的内容是( )。A.4B.5C.1OD.40

考题 在窗体中有一个命令按钮(名称为run34),对应的事件代码如下: PrivateSub run34_Click sum=0 For i=10T01 Step-2 sum=sum+i Next i MsgBoxsum End Sub 运行以上事件,程序的输出结果是( )。A.10B.30C.55D.其他结果

考题 在窗体中有1个命令按钮,对应的事件代码如下。单击命令按钮时,输出的结果是()。 Private Sub Commandl_Click() Dim s As Integer s = f (1) + f (2) + f (3) Debug.Print s End Sub Public Function f(n As Integer) As Integer Dim i As Integer f = 0 For i = 1 To n f = f + i Next i End FunctionA.1B.3C.6D.10