有如下事件过程: Private Sub Command1_Click() b=10 Do Until b=-1 a=InputBox("请输入a的值") a=Val(A) b=

admin2010-03-30  19

问题 有如下事件过程:    Private Sub Command1_Click()        b=10        Do Until b=-1            a=InputBox("请输入a的值")            a=Val(A) b=InputBox("请输入b的值")            b=Val(B) a=a*b        Loop        Print a    End Sub    程序运行后,依次输入数值30,20,10,-1后,输出结果为(    )。

选项 A、6000
B、-10
C、200
D、-6000

答案2

解析 本段程序的执行过程如下;第1次输入30,并给变量a赋值为30;第2次输入20,并给变量b赋值为20,这是执行语句a=a*b=600,接着判断b=20条件不成立,因此继续循环;第3次输入10,给a赋值为10,第4次输入-1并赋值给变量b,再执行语句a=a*b=-10;然后判断循环条件,b=-1条件为真,所以退出循环。
转载请注明原文地址:https://kaotiyun.com/show/La1p777K
0

随机试题
最新回复(0)