题目内容
（请给出正确答案）
窗体下面有一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=0 Do Until x = -1 a=InputBox("请输入第一个数字a的值") a=Val(a) b=InputBox("请输入第二个数字b的值") b=Val(b) x=InputBox("请输入第三个数字x的值") x=Val(x) a=a+b+x Loop Print a End Sub 在程序运行后，单击命令按钮，在对话框中分别输入5，4，8，5，8，-1，输出结果为______。
如果结果不匹配，请 联系老师 获取答案
更多“窗体下面有一个命令按钮，然后编写如下事件过程： Privat…”相关的问题
A.-5
B.25
C.-1
D.1
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a=0 For i=1 To 2 For j=1 To 4 If j Mod 2＜＞0 Then a=a+1 End If a=a+1 Next j Next i Print a End Sub 程序执行后，单击命令按钮，输出结果是【 】。
在窗体上画一个名称为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．4
B．5
C．6
D．7
在窗体上画一个命令按钮，然后编写如下事件过程：
Option Base 1
Private Sub Command1_Click()
Dima As Variant
a=Array(1，2，3，4)
j=1
Fori=4 To 1 Step-1
s=s+a(i)*j
j=j*10
Next i
Print s
End Sub
运行上面的程序，单击命令按钮，其输出结果是()。
A、4321
B、12
C、34
D、1234
A.111456
B.456
C.567
D.111
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a(1 To 10) Dim p(1 To 3) k=5 For i=1 To 10 a(i)=i Next i For i=1 To 3 p(i)=a(i*i) Next i For i=1 To 3 k=k+p(i)*2 Next i Print k End Sub 程序运行后，单击命令按钮，输出结果是【 】。
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下事件代码：
MsgBox f(24，18)End Sub
Public Function f(m As Integer，n As Integer)As"integerDo While m＜＞n
Do While m＞n m=m-n
Loop
Do While m＜n
n=n-m
Loop
Loop
f=m
End
Function
窗体打开运行后，单击命令按钮，则消息框的输出结果是（）。
A.2
B.4
C.6
D.8
