• 2022-06-12 问题

    阅读下面的程序: 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 End If Loop Loop Until Check=FalSe Print Counter End Sub 程序运行后,单击窗体,输出结果为______。

    阅读下面的程序: 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 End If Loop Loop Until Check=FalSe Print Counter End Sub 程序运行后,单击窗体,输出结果为______。

  • 1