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