2. 计算机
  3. 有如下程序： Private Sub Form Click() Dim Check，Counter Check=True Counter=0 Do Do While Counter＜20

有如下程序： Private Sub Form Click() Dim Check，Counter Check=True Counter=0 Do Do While Counter＜20

admin2010-03-30  27
问题 有如下程序：    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  Tree
D、10  False
答案8
解析 本题考查嵌套的Do… Loop循环。Do循环嵌套的规则与For-Next循环相同，按照先进后出、后进先出的原则，不能交叉。考生需判断程序在何时跳出循环，内层循环是在 Counter＜20时，对其加1，但要注意循环内的条件语句，当Counter=10时，跳出内层循环，同时将Check设为False。外层循环的循环条件是Check=False，所以当程序跳出内层循环时，外层循环的条件也满足了，故同时也跳出循环，此时Counter=10，Check为False，选项D正确。
转载请注明原文地址:https://kaotiyun.com/show/4l1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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