阅读下面的程序: Private Sub Form_Click( ) Dim Check As Boolean,Counter As Integer Check=Tree Counter=5

admin2009-02-13  32

问题 阅读下面的程序:
    Private Sub Form_Click(    )
       Dim Check As Boolean,Counter As Integer
       Check=Tree
       Counter=5
       DO
          DO While Counter<20
            Counter=Counter+1
              If Counter=10 Then
                 Check=False
              Exit Do
             End if
           Loop
       Loop Until Check=False
       Print Counter
     End Sub
     程序运行后,单击窗体,输出结果为【  】。

选项

答案10

解析 本题内循环的结束条件是当Counter为10时,而此时Check=False,则跳出外循环,故最后Counter为10。
转载请注明原文地址:https://jikaoti.com/ti/Y5q0FFFM
0

最新回复(0)