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

有如下程序： Private Sub Form_Click() Dim Check, Counter Check=True Counter=0 Do Do Whi

admin2010-09-11  25
问题 有如下程序：    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
答案D
解析 变量Check的初值为True，变量Counter的初值为0。当Counter＜9时，Counter每次循环加1，直到等于10时，Check的值为False，退出里层Do-Loop循环。当Check=False的计算结果为True时，退出外层Do-Loop循环，在窗体上打印出Counter的值10和Check的值Ralse。
转载请注明原文地址:https://jikaoti.com/ti/Etg0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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