[填空题] 阅读下面的程序：Private Sub Form

[填空题] 阅读下面的程序： Private Sub Form

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