单项选择题

有如下程序;
Private SubForm_Click()
Dim check As Boolean,n As Integer
check=False
n=0
Do
Do While n<10
n=n+1
If n=5 Then
check=True
Exit Do
End if
Print n;
Loop
Loop Until check = True
End Sub
程序运行后,输出的结果是()。

A、 1 2 3
B、 1
2 3 4
C、 1
2
3 4
5
D、 1
2
3
4
5
6