有如下程序: 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
A.15 B.20 C.10 D.10
【参考答案】
D 解析:变量Check的初值为True,变量Counter的初值为0。当Counter<9时,Counter每次循环加1,直到等于10时,Check的值为False,退出里层Do-Loop循环。当Check=False的计算结果为True时,退出外层Do-Loop循环,在窗体上打印出Cou......