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

admin2009-01-15  33

问题 有如下事件过程: 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 aEnd Sub程序运行后,依次输人数值30,20,10,-1,输出结果为

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

答案2

解析 Do Until-Loop循环执行的规则是:先判 本程序执行时,先判断条件“b=-1”是否为真,此时b为10,“b=-1”不成立,执行循环体。a和b分别取得InputBox函数接收到的值为30和20,做乘法后a的值为600。执行Loop后,返回Do语句再判断“b=-1”是否为真,此时b为20,“b=-1不成立,继续执行循环体,a和b再次取得InputBox函数接收到的值为10和-1,做乘法后a的值为 -10。执行Loop后,返回到Do语句判断“b=-1是否为真,此时b=-1,“b=-1条件成立,结束循环,把a的值打印出来。断Do语句中的<条件> 若为真,则结束循环;若<条件>为假,则执行循环体。
转载请注明原文地址:https://kaotiyun.com/show/Qv2p777K
0

相关试题推荐
最新回复(0)