阅读下面的程序：PriVate Sub Form_C1ick()Dim Check As Booleau，Counter As IntegerCheck=TrueCounter=5DoDo While Counter＜20Counter=Counter+1If Counter=10 ThenCheck=FalSeEXit Do
阅读下面的程序：
PriVate Sub Form_C1ick()
Dim Check As Booleau，Counter As Integer
Check=True
Counter=5
Do
Do While Counter＜20
Counter=Counter+1
If Counter=10 Then
Check=FalSe
EXit Do
相关考题：
下列( )语句使复选框Check1无效。A、 Check1.Value = 1B、 Check1.Value = 2C、 Check1.Style. = 1D、 Check1.Style. = 0
下列关于PDCA循环理论描述中正确的是A、Play、Do、Check、AbbreviateB、Play、Develop、Check、ActionC、Play、Develop、Capacity、AbbreviateD、Plan、Do、Check、ActionE、Plan、Do、Check、Abbreviate
给出下面的程序：Private Sub Command1_ 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 MsgBox CounterEnd Sub 程序最后弹出的消息对话框的内容是______。A．TrueB．FalseC．20D．10
19、下列（）语句使复选框Check1的标题显示在左边。A．Check1.Style = 0B．Check1.Alignment = 0C．Check1.Style = 1D．Check1.Alignment = 1
下列（）语句使复选框Check1的标题显示在左边。A．Check1.Style = 0B．Check1.Alignment = 0C．Check1.Style = 1D．Check1.Alignment = 1
18、下列（）语句使复选框Check1变成灰色。A．Check1.Value = 0B．Check1.Value =1C．Check1.Value = 2D．Check1.Style = 0