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

admin2009-02-13 86

问题阅读下面的程序：
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://kaotiyun.com/show/O61p777K

本试题收录于：二级VB题库NCRE全国计算机二级分类