阅读下面的程序：

Private Sub Form_Click()

Dim Check As Boolean,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

程序运行后，单击窗体，输出结果为（）。

什么是完善井？