2. 计算机
  3. 阅读下面的程序： Private Sub Form_Click() Dim Check， Counter Check=True Counter=0 Do Do While

阅读下面的程序： Private Sub Form_Click() Dim Check， Counter Check=True Counter=0 Do Do While

admin2009-02-13  20
问题 阅读下面的程序：    Private  Sub  Form_Click()       Dim  Check，    Counter       Check=True       Counter=0       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， Check    End Sub    程序运行后，单击窗体，输出的结果为
选项 A、15  0
B、20  -1
C、10  True
D、10  False
答案8
解析 这是一个二重循环，内层和外层都是 Do循环。在内层循环中，执行循环体的条件是 Counter＜20，由于Counter的初值为0，因此执行循环体。在循环体中，每次循环Counter加1，达到10后，将Check变量设置为False，同时执行 Exit Do，退出内层循环。外层循环执行的条件是，变量Check的值是True，如果Check为False，则退出外层循环，输出结果，结束程序。由于在退出内层循环时，Check 已被设置为False，因此退出内层循环后立即就可以退出外层循环。退出两层循环后，Counter和Check的值没有发生任何变化，与退出内层循环时相同，分别为10和 False。
转载请注明原文地址:https://kaotiyun.com/show/a91p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)