在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Do While b>=0 a=Val(InputBox("请输入a的值")) b=Val(InputBox("请输入b的值"

admin2010-03-22  48

问题 在窗体上画一个命令按钮,然后编写如下事件过程:
   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。
转载请注明原文地址:https://kaotiyun.com/show/13wp777K
0

最新回复(0)