在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click（）s=1Dos=（s + 1） * （s + 2）Number=Number + 1Loop Until s =30Print Number, sEnd Sub程序运行后，输出的结果是（ ）。A．2 3B．2 56C．5 12D．10 20
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click（）
s=1
Do
s=（s + 1） * （s + 2）
Number=Number + 1
Loop Until s >=30
Print Number, s
End Sub
程序运行后，输出的结果是（ ）。
A．2 3
B．2 56
C．5 12
D．10 20
相关考题：
布窗体上画一个名称为Command l的命令按钮，然后编写如下事件过程：Private Sub Command l-Click ()n=5f=ls=oFor I =l To nf=f【 】s= s +fNextPrint sEnd Sub该事件过程的功能是计算s=1+1／2!+l+3!+…+l/ n!的值。请填空。
在窗件上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a=12345 Print Format S(a, "000. 00") End Sub 程序运行后，单击命令按钮，窗体上显示的是______。A．123.45B．12345.00C．12345D．00123.45
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a S="VisualBasic" Print String(3, a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是______。A．VVVB．VisC．sicD．11
在窗体上画一个名称为Commandl的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Function fun(By Val m As Integer) If m Mod 2=0 Then fun=2 Else fun=1 End If End Function Private Sub Commandl_Click() Dim i As Integer,s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub 程序运行后，单击命令按钮，在窗体上显示的是______。A． 6B．7C．8D．9
在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubcommand1_click()DimaAsString,bAsStringa=InputBox(EntertheFirstinteger)b=InputBox(EntertheSecondinteger)Printb+aEndSub程序运行后，单击命令按钮，先后在两个输入对话框中分别输入456和111,则输出结果是( )A.456B.111C.567D.111456
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Privfite Sub Command1_Click()n=5f=1s=0For i=1 To nf=f 【 】s=s+fNextPtint SEnd Sub该事件过程的功能是计算s=1+2!+1/3!+...+1/n!的值。请填空。
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() Dim a() a=Array(1，3，5，7) s=0 For i=1 To 3 S=S*10+a(i) Next i Print s End Sub 程序运行后，输出结果为( )。A．135B．357C．531D．753
在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码；PrivateSubCommand1_Click()s="ABBACDDCAB"Fori=6To2Step-2x=Mid(s,i,i)y=LeR(s,i)z=Right(s,i)z=xyzNextiMsgBoxzEndSub窗体打开运行后，单击命令按钮，则消息框的输出结果是______。A．AABAABB．ABBABAC．BABBAD．BBABBA
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Prirate Sub Command1_Click() s = 0 For i=1 To 13 x = i * i-1 If x Mod 3 = 0 Then s = s + 1 Next i Print s End Sub 程序运行后，单击命令按钮，则窗体中显示的内容是A．1B．5C．27D．45
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a() a=Array(1，3，5，7) s=0 For i=1 To 3 s=s*10+a(i) Next i Print s End Sub 程序运行后，输出结果为( )。A．135B．357C．531D．753
在窗体上画一今名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Integer,s As Integer a=8 s=1 Do s=s+a a=a-1 Loop While a＜=0 Print s；a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是 ______。A．79B．340C．97D．死循环
在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：Private Sub Corrtmandl Click()a$=”Nationalcomputer rank Examination”n=Len(a$)S=0For i=1 To nb$=Mid(a$，i，1)Ifb$=”n”Thens=s+1End IfNext iPrint sEnd Sub程序运行后，单击命令按钮，输出结果是【 】。
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Integer，s As Integer a = 8 s = 1 Do s = s + a a = a - 1 Loop While a＜=0 Print s，a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．7 9B．34 0C．9D．死循环
假定有以下函数过程： Function Fun(S As String)As String Dimsl As String Fori=1 To Len(S) s1=UCase(Mid(S，i，1))+s1 Nexti Fun=s1 End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() DimStrl As String，Str2 As StrA．abcdefgB．ABCDEFGC．gfedcbaD．GFEDCBA
在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程； Private Function fun(ByVal m As Integer) If m Mod 2=0 Then fun=2 Else fun=1 End If End Function Private Sub Command1_C1ick() Dim i As Integer, s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub 程序运行后，单击命令按钮，在窗体上显示的是______。A．6B．7C．8D．9
在窗体上画一个命令按钮，然后编写如下事件过程。 Private Sub Commandl Click（ ） Dima0a=Array（1，3，5，7）s=0Fori——1t0 3S=s*10+a（i）NextiPrint sEndSub程序运行后，输出结果为（ ）。A.135B.357C.53lD.753
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Privme Sub Command1_Click( )n=5f=1s=0For i=1 To nf=f【 】s=s+fNextPrint sEnd Sub该事件过程的功能是计算的值。请填空。
在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Function f(m As Integer) If m Mod 2 = 0 Then f = m Else f = 1 End If End Function Private Sub Command1_Click() Dim i As Integer s = 0 For i = 1 To 5 s = s + f(i) Next Print s End Sub 程序运行后，单击命令按钮，在窗体上显示的是A． 11B．10C．9D．8
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Dim a() a=Array(1,3,5,7) s=0 For i=1 To 3 S=S*10+a(i) Next i Print s End Sub 程序运行后，输出结果为( )。A．135B．357C．531D．753
在窗体上画一个命令按钮，名称为Command1。然后编写如下程序： Private Sub Command1_Click() Dim j As Integer,s As Integer s=1 Do s=s+j j=j+1 Loop Until j＞=5 Print s End Sub 程序运行后，单击命令按钮，在窗体上输出的结果是( )。A．11B．1C．16D．7
在窗体上画一个命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1 Click() Dim a a=Array(1， 2， 3， 4) j = 1 For i = 4 To 1 Step -1 s = s + a(i)* j i = j * 10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果为A．4321B．12C．34D．1234
在窗体上面一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Integer, s As Integer a=8 s=1 Do s=s+a a=a-1 Loop While a＜=0 Print s; a End Sub 程序运行后，单击命令按钮．则窗体上显示的内容是______。A．7 9B．34 0C．9 7D．死循环
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command_Click( ) S=0 Do s=(s + 1) * (s +2) Number=Number+1 Loop Until S＞=30 Print Number，S End Sub 程序运行后，输出的结果是A．2 3B．3 182C．5 12D．10 20
单选题设有如下通用过程：在窗体上画一个名为Command1的命令按钮，然后编写如下的事件过程：程序运行后单击命令按钮，输出结果是（ ）。AABCDEFBabcdefCAFBECDDDEFABC