A)814B)563 C)281D)2435 (21)有如下程序: 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 lo Loop Until Check= False Print counter, Check End sub 程序运行后,单击窗体,输出结果为 A)150B)20-1 c)10 Trued)10 FalseA ） 81 4 B ） 56 3 C ） 28 1 D ） 243 5 （ 21 ）有如下程序： 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