问题 填空题

阅读下面的程序: 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。

单项选择题
单项选择题