2. 计算机
  3. 有如下程序： Private Sub Form_C1ick() Dim CheCk,Counter CheCk=True Counter=0 Do

有如下程序： Private Sub Form_C1ick() Dim CheCk,Counter CheCk=True Counter=0 Do

admin2009-02-15  72
问题 有如下程序：      Private Sub Form_C1ick()          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          Ptint Counter,Check      End Sub    程序运行后，单击窗体，输出结果为______。
选项 A、 15    0
B、20    -1
C、10    Tree
D、10    False
答案D
解析 Do While…Loop是先判断条件表达式的值是否为True，如果为True，则执行循环体，如果为False，则执行Loop后面的语句。Do…Loop Until是先执行循环体，再判断条件表达式，如果表达式的值为True，则执行Loop后面的语句，如果为False，则继续执行循环体。而Exit Do则是强行退出循环。当Counter =10时，强行退出DoWhile循环，而由于此时Check=False，使得umil的条件为True，结束外层循环。所以最终Coumer=10。
转载请注明原文地址:https://www.kaotiyun.com/show/Om1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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