单选题有如下程序；
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

【正确答案】 B

【答案解析】[解析] 本题给出的程序由两层循环组成，外层循环使用的语句是Do．．．Until，内层循环使用的语句是Do While。Print语句在内层循环的End if语句的下面，内层循环共循环了4次，Print语句输出的值分别为1、2、 3、4；当内层循环到第5次时，将标志值check设置为True，并用Exit Do语句强制退出内层循环。外层循环则在检测到标志值check为True时，立即退出循环，而不会打印输出5。