[填空题] 阅读下面的程序:Private Sub Form_Click()Dim Check As Boolean,Counter As IntegerCheck=TrueCounter=5DoDo

14 查阅

[填空题] 阅读下面的程序: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

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

计算机考试