问题 填空题

在窗体上画一个命令按钮,然后编写如下事件过程:
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

解析: 本题考查VBA中循环的知识。对于这种循环结构,首先看条件判断在循环体的前面还是后面,如果是先判断条件,则有可能一次也不执行循环体;如果是后判断条件,则无论条件如何至少执行一次循环体。在Until循环中条件为False时执行循环体,条件为True时退出循环;在While循环中条件为True时执行循环体,条件为False时退出循环,这一点要注意区分清楚。本题是一个先判断条件的While循环,每次循环中有两次输入,共循环3次;由于在每次循环中均会重新对a、b、c进行赋值,所以只需要考虑最后一次循环就可以,在最后一次循环中,c等于最后两次输入的值之和,也就是-3。

单项选择题
单项选择题