问题
单项选择题
有下列事件过程:
Private Sub Command1_Click()
b==10
Do Until b=-1
a=InputBox("请输入a的值")
a=Val(a)
b=InputBox("请输入b的值")
b=Va(b)
a=a*b
Loop
Print a
End Sub
程序运行后,依次输入数值30,20,10,-1后,输出结果是( )。
A.600
B.-10
C.200
D.-6000
答案
参考答案:B
解析: 本段程序的执行过程如下:
第一次输入30,并给变量a赋值为30;第二次输入20,并给变量b赋值为20,这时执行语句a=a*b=600,接着判断b=20条件不成立,因此继续循环;第三次输入10,给a赋值为10;第四次输入-1并赋值给变量b,再执行语句a=a*b=-10;然后判断循环条件,b=-1条件为真,所以退出循环。