有如下程序: Private Sub Form_Click()  Dim Check,Counter  Check=True  Counter=0  Do   Do While Counter<20    Coun

admin2012-03-22  37

问题 有如下程序:    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

解析
转载请注明原文地址:https://jikaoti.com/ti/vOO0FFFM
0

最新回复(0)