填空题

在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Do While b＞=0
a=Val(InputBox(”请输入a的值”))
b=Val(InputBox("请输入b的值"))
c=a+b
Loop
MsgBox c
End Sub
程序运行后，依次输入3、2、1、0、-1和-2，则输出结果是______。

【参考答案】

-3
<上一题 目录 下一题>
热门 试题

填空题
在窗体上画一个命令按钮Command1，编写事件代码如下： Private Sub Command1_Click() Dim a1(4，4)，a2(4，4) For i=1 To 4 For j=1 To 4 a1(i，j)=i+j a2(i，j)=al(i，j)+i+j Next j Next i MsgBox(a1(3，3)*a2(3，3)) End Sub 程序运行后，单击命令按钮，消息框输出的是______。
填空题
在窗体上画一个命令按钮Command1，编写事件代码如下： Public x As Integer Private Sub Command1_Click() x=3 Call f1 Call f2 MsgBox x End Sub Private Sub f1() x=x*x End Sub Private Sub f2() Dim x As Integer x=x+4 End Sub 运行窗体后，单击命令按钮，则消息框的输出结果为______。
相关试题