当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 阅读下面的程序:Private Sub Form_Click()Dim Check As Boolean,Counter As IntegerCheck=TrueCounter=5DoDo While Counter<20Counter=Counter+1If Counter=10 ThenCheck=FalseExit DoEnd IfLoopLoop Until Check=FalsePrint CounterEnd Sub程序运行后,单击窗体,输出结果为()。

  

参考答案:

10

  参考解析

[评析]DoWhile…Loop是先判断条件表达式的值是否为True,如果为True,则执行循环体,如果为False,则执行Loop后面的语句。Do’”LoopUntil是先执行循环体,再判断条件表达式,如果表达式的值为True,则执行Loop后面的语句,如果为False,则继续执行循环体。而ExitDo则是强行退出循环。本题中,当Counter=10时,强行退出DoWhile循环,而由于此时Check二False,使得Umil的条件为Tree,结束外层循环。所以最终Counter=10。

微信端