在窗体中添加一个命令按钮(名称为Command1)，然后编写如下代码： Private Sub Command1_Click() a=3:b=4:c=5 MsgBox a=b+c End Sub 窗体打开运行后，如果单击命令按钮，则消息框的输出结果为( )。

A．0

B．9

C．a=9

D．假

[单选题]在窗体中添加一个命令按钮(名称为Command1)，然后编写如下代码： Private Sub Command1_Click() a=0:b=5:c=6 MsgBox a=b＋c End Sub 窗体打开运行后，如果单击命令按钮，则消息框的输出结果为______。A．11B．a=11C．0D．False

[单选题]在窗体中添加一个命令按钮(名称为Command1) ，然后编写如下代码： Private Sub Command1_Click( ) A=95 If A＞60 Then I=1 If A＞70 Then I=2 If A＞80 Then I=3 If A＞90 Then I=4 MsgBox I End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是______。A．1B．2C．3D．4

[单选题]在窗体上画一个命令按钮(其名称为Command1)，然后编写如下代码：Private Sub Command 1_Click()D．im aa=Array(1,2，3，4)i=3：i=1D．o While i>=0s=s+a(i)*ji=i-1j=j*10LoopPrint sE．nd Sub运行上面的程序，单击命令按钮，则输出结果是( )。A．4321B．123C．234D．1234

[单选题]在窗体中添加—个名称为Command1的命令按钮，然后编写如下代码： Function F(a As Integer) b=0 Static c b=b+1 C=c+1 F=a+b+c End Function Private Sub Command1_Click( ) Dim a As Integer Dim b As Integer a=2 For i=l To 3 b=F(A)Print b Next i End Sub 程序运行后，如果单击按钮，则在窗体上显示的内容是A．4 4 4B．4

[试题]在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：Private Sub Command1_Click（）D．im s，iF．or i=1 To 10s=s+iNext iMsgBox sE．nd Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为 。

[试题]在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：Private Sub f(ByVal x As Integer)x=x+4E．nd SubPrivate Sub Command1_Click()i=3C．all f(i)If i＞4 Then i=i*2E．nd Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为( )。

[试题]在窗体上添加一个名称为Command1的命令按钮，然后编写如下程序：Private Sub f(ByVa1 x As Integer)x=x+4E．nd SubPrivate Sub Command1_Click()i=3C．all f(1)If i＞4 Then i=i*2MsgBox iE．nd Sub打开窗体运行后，单击命令按钮，则消息框的输出结果为______。

[单选题]在窗体上画一个命令按钮，名称为 Command1, 然后编写如下代码：Option Base 0Private Sub Command1_Click（）D．im A （4）As Integer,B（4） As IntegerF．or k=0 To 2A．（k+1）=InputBox（“ 请输入一个整数 ”）B．（3-k）=A（k+1）Next kPrint B（k）E．nd Sub程序运行后，单击命令按钮，在输入对话框中分别输入2、4、6，输入结果为（ ）。 A．0B．2C．3D．4

[单选题]在窗体上画一个命令按钮，名称为Command1，然后编写如下代码：Option Base()Private Sub Command1_ Click() Dim A1(4) As Integer, A2(4)As Integer For k= 0 To 2 A1(k+1)=InputBox(“请输入—个整数”) A2(3-k)=A1(k+1) Next k Print A2 (k)End Sub程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，则输出结果为______。A．0B．1C．2

[单选题]在窗体上画一个命令按钮，名称为Command1，然后编写如下代码： Option Base() Private Sub Command1 Click() Dim A(4)As Integer,B(4)As Integer For k=0 To 2 A(k+1)＝InputBox(“请输入一个整数”) B(3-k)＝A(k+1) Next k Print B(k) End sub 程序运行后，单击命令按钮，在输入对话框中分别输入2、4、6，输出结果为______。A．0B．2C．3D．4