单选题 设有如下程序:
Private Sub Command1_Click()
Dim m As Integer,n As Integer
m=1
For n=1 To 5
m=m*n
If m>15 Then
Exit For
Else
n=n+1
End If
Next n
Print m;n
End Sub
程序运行后,单击命令按钮Command1,输出结果为______。
【正确答案】 C
【答案解析】[解析] 第一次循环:m=1,n=1时,执行循环体m=1*1=1,接着判断m是否大于15,否,执行else,n=n+1=2;n要加上一个步长,即n=2+1=3,进入第二次循环:m=1,n=3,执行循环体:m=1*3=3,再执行else,n=3+1=4;n加上一个步长,即n=4+1=5,进入第三次循环:m=3,n=5,执行循环体:m=3*5=15,再执行else,n=5+1=6;n加上一个步长,即n=6+1=7>5不再进入循环。故最终输出5和7。