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