Private Sub run34_Click( )
sum=0
F.or i=10 To 1 Step -2
sum=sum+i
Next i
MsgBox sum
E.nd Sub
运行以上事件,程序的输出结果是( ) 。
A. ) 10
B. ) 30
C. ) 55
D. )其他结果
[单选题]在窗体中有一个命令按钮(名称为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.其他结果
[单选题]在窗体中有一个命令按钮(名称为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_Enter()D.im num As Integer,a As Integer,b As Integer,i As IntegerF.or i=1 To 10num=InputBox(“请输入数据:”,“输入”)If Int(num/2)=num/2 Thena=a+lE.lseb=b+1E.nd ifNext iMsgBox(“运行结果:a=“&Str(a)&”,b=”&Str(b))E
[单选题]在窗体中有一个命令按钮(名称为run1),对应的事件代码如下: Private Sub rum_Click() suln=0 For i=10 To 1 Step-2 sum=Sum+i Next i MsgBox sum End Sub 运行以上事件,程序的输出结果是( )。A.10B.30C.55D.其他结果
[单选题]窗体中有命令按钮run34,对应的事件代码如下:PrivateSubrun34_Enter()DimnumAsInteger,aAsInteger,b
[单选题]在窗体中有一个命令按钮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("运行结果:
[单选题]在窗体中有一个命令按钮run1,对应的事件代码如下:Private Sub run1_Enter()D.im num As IntegerD.im m As IntergerD.im n As IntegerD.im i As IntegerF.or i=1 To 10num=InputBox("请输入数据:","输入",1)If Int(num/2)=num/2 Thenm=m+1E.lsen=n+1E.nd IfNext iMsgBox("运行结果:m="& Str(m)
[单选题]34 )在窗体上有一个命令按钮 Commandl ,编写事件代码如下:Private Sub Commandl_Click()D.im d1 As DateD.im d2 As Datedl = #12/25/2009#d2 = #1/5/2010#MsgBox DateDiff( ” ww ” , d1, d2)E.nd Sub打开窗体运行后,单击命令按钮,消息框中输出的结果是A. ) 1B. ) 2C. ) 10D. ) 11
[问答题]在窗体中有一个名为run34的命令按钮,事件代码如下:打开窗体,单击命令按钮,消息框的输出结果是( )。
[单选题]( 35 )在窗体中有一个命令 run35, 对应的事件代码如下:private sub run35_enter()D.im num as integerD.im a as integerD.im b as integerD.im I as integerF.or I=1 to 10Num=inputbox( “ 请输入数据: ” , ” 输入 ” ,1)If int(num/2)=num/2 thenA.=a+1E.lseB. =b+1E.nd ifNext IMsgbox( ” 运行结果: