(6）在窗体上有1个名称为Command 1的命令按钮，并有如下事件过程和函数过程：Private Sub Command 1_Click()Dim p As Integerp＝m(1）＋m(2)＋m(3）Print pEnd SubPrivate Function m(n As Integer) As IntegerStatic s As IntegerFor k＝1 To ns＝s＋1Nextm=sEnd Function运行程序，单击命令按钮Command 1的输出结果为【6】。
(6）在窗体上有1个名称为Command 1的命令按钮，并有如下事件过程和函数过程：
Private Sub Command 1_Click()
Dim p As Integer
p＝m(1）＋m(2)＋m(3）
Print p
End Sub
Private Function m(n As Integer) As Integer
Static s As Integer
For k＝1 To n
s＝s＋1
Next
m=s
End Function
运行程序，单击命令按钮Command 1的输出结果为【6】。
相关考题：
工程中有2个窗体,名称分别为Form1.Form2,Form1为启动窗体,该窗体上有命令按钮Command1,要求程序运行后单击该命令按钮时显示Form2,则按钮的Click事件过程应该是（ ）。A．Private Sub Command1_Click（ ）Form2.ShowEnd SubB．Private Sub Command1_Click（ ）Form2.VisibleEnd SubC．Private Sub Command1_Click（ ）Load Form2End SubD．Private Sub Command1_Click（ ）Form2.LoadEnd Sub
在窗体上有一个命令按钮，其名称为Command1。要实现程序运行后，单击命令按钮，如果在输入对话框里分别输入12和4，编写如下事件过程：Private Sub Command1_Click()A=InputBox("被除数")B=InputBox("除数")Print A；"÷"；B；"="；A / BEnd Sub则窗体中显示的内容是______。
在窗体上画一个名称为 \Command1\ 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（）Dim a As StringA="123456789"For i=1 To 5Print Space（6-i）;Mid $ （a,______ ,2*i-1）Next iEnd Sub程序运行后，单击命令按钮，窗体上的输出结果是5456345672345678123456789请填空。
工程中有两个窗体，名称分别为Form1、Form2，Fonn1为启动窗体，该窗体上有命令按钮 Command1。要求程序运行后单击该命令按钮时显示Form2，则按钮Click事件过程应该是 ______。A．Private Sub Command1_click() Foma2.Show End SubB．Private Sub Command1_Click() Form2.Visible End SubC．Private Sub Command1_Click() Load Form2 End SubD．Private Sub Command1_click() Form.Load EndSub
在窗体上画一个命令按钮(名称为Command1)，然后编写如下事件过程： Private Sub Command1_Click() b=5 c=6 Print a=b+c End Sub 程序运行后，单击命令按钮，输出的结果是 ______。A．a=11B．a=b+cC．a=D．假
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a S="VisualBasic" Print String(3, a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是______。A．VVVB．VisC．sicD．11
（ 13 ）设在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框。要求单击 Command 1按钮时可把光标移到文本框中。下面正确的事件过程是A ） Private Sub Command1_Click()Text1.GotFocusEnd SubB ） Private SubCommand1.GotFocusEndSubC ） Private Sub Command1_Click()Text1.SetFocusEnd SubD ） Private SubCommand1.SetFocusEnd Sub
窗体上有一个命令按钮Command1，编写如下事件过程：Private Sub Command1_Click()x = InputBox("x=")y = InputBox("y=")Print x + yEnd Sub运行后，单击命令按钮，先后在两个输入对话框中输入123和321，窗体显示的内容是( )。A、 444B、 123321C、 123+321D、 出错信息
如下图所示的两个窗体：要使其中第一个窗体中的第一个命令按钮来控制显示第二个窗体，第二个命令按钮用来结束程序的运行(两个按钮名称为Command1和Command2)。则以下选项中，对这两个命令按钮编写的事件过程正确的是A．Private Sub Command1 Click() Form2．Show 1 End Sub Private Sub Command2_Click()End End SubB．Private Sub Command1_Click() Show 1 End Sub Private Sub Conunand2_Click() End End SubC．Private Sub Conmmand1_Click() Show 1 End Sub Private Sub Command2_Click() End End SubD．Private Sub Command1_Click()Show 1， Form2 End SubPrivate Sub Command2_Click() End End Sub
窗体Form1上有一个名称为Command1的命令按钮，以下对应窗体单击事件的事件过程是（ ）。A.Private Sub Form1 Click（ ）End Sub···B.Private Sub Form1. Click（ ）End Sub···C.Private Sub Command1 click（ ）End Sub···D.Private Sub Command Click（ ）End Sub···
在窗体上画一个命令按钮(名称为Command1)，然后编写如下事件过程： Private Sub Command1_Click() Dim b As Integer b=b+1 End Sub 运行程序，三次单击命令按钮后，变量b的值是： ______。A．0B．1C．2D．3
在窗体上画一个命令按钮(名称为Command1)，编写如下事件过程： Private Sub Command1_Click() b=5 c=6 Print a=b+c End Sub 程序运行后，单击命令按钮，输出的结果是： ______。A．a=11B．a=b+cC．a=D．假
在窗体上画—个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click_() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n\3 Next n print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是 ______。A．15B．18C．21D．24
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click( ) a=12345 Print Format $(a，"000.00") End Sub 程序运行后，单击命令按钮，窗体上显示的是A．123.45B．12345.00C．12345D．00123.45
在窗体上画一个名称为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
在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程：Private Sub Command1_CliekDim b, kFor k = 1 to 6b=23+kNext kMsgBox b + kEnd Sub打开窗体后，单击命令按钮，消息框的输出结果是【 】。
在窗体上有一个命令按钮Command1，通用过程fun和命令按钮的事件过程如下：Private Function fun(ByVal m As Integer)Ifm Mod2=0 Thenfun=2Elsefun=1End IfEnd FunctionPrivate Sub Command1_Click()Dim i As Integer,s As Integers=0For i=1 To 5s=s+fun(i)NextPrintsEnd Sub程序运行后，单击命令按钮，则窗体上输出( )。A．6B．7C．8D．9
在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：Private Sub Command1_Cilck()End Sub运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是( )。
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后，单击命令按钮，窗体上显示的是A． 123.45B．12345.00C．12345D．00123.45
在窗体上有一个命令按钮Command1，通用过程fun和命令按钮的事件过程如下： 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_Cliek() 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
在窗体上画—个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim num As Integer num=1 DO Until num＞6 Print num; num=num+2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是 ______。A．13.45.8B．1 3 5C．1 4 7D．无数据输出
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： option Base 1 Private Sub Command1_Click() Dim a a=Array(1, 2, 3, 4, 5) For i=1 To UBound(a)a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是______。A．4B．5C．6D．7
在窗体上画一个命令按钮(名称为Command1)，然后编写如下事件过程： Private Sub Command1_Click() a=4:b=5:c:6 Print a=b+c End Sub 程序运行后，单击命令按钮，其结果为A．a=11B．a=b+cC．FalseD．出错
（ 15 ）在窗体上添加一个命令按钮（名为 Command1 ），然后编写如下事件过程：Private Sub Command1_Click （）Dim b,kFor k=1 to 6b=23+kNext kMsgBox b+kEnd Sub打开窗体后，单击命令按钮，消息框的输出结果是 【 15 】 。
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（）x = -5If Sgn（x） Then y = Sgn（x ^ 2）Else y = Sgn（x）End IfPrint yEnd Sub程序运行后，单击命令按钮，窗体上显示的是（ ）。A．-5B．25C．1D．-1
窗体Form. 1上有一个名称为Command 1的命令按钮，以下对应窗体单击事件的事件过程是A）Private Sub Form. 1_Click() B）Private Sub Form. _Click()End Sub End SubC）Private Sub Commandl_Click() D）Private Sub Command_ Click()End Sub End Sub
单选题窗体上有1个名称为Command1的命令按钮，事件过程及函数过程如下：运行程序，第2次单击命令按钮Command1时的输出结果为（ ）。A6B10C16D28