问题
填空题
阅读下面的程序: Private Sub Form_Click( ) Dim Check As Boolean,Counter As Integer Check=Tree Counter=5DO DO While Counter<20 Counter=Counter+1 If Counter=10 ThenCheck=False Exit Do End if Loop Loop Until Check=False Print Counter End Sub 程序运行后,单击窗体,输出结果为 【9】 。
答案
参考答案:J
解析: 本题内循环的结束条件是当Counter为10时,而此时Check=False,则跳出外循环,故最后Counter为10。