单选题 有如下程序:
Private Sub Form_Click()
Dim i As Integer, n As Integer
For i=1 To 20
i=i+4:n=n+i
If i>10 Then Exit For
Next
Print n
End Sub
程序运行后,单击窗体,则输出结果是
【正确答案】 D
【答案解析】[解析] 本题的For循环中改变了循环变量i的值,而且在循环中还有Exit语句退出循环,故此需要逐次循环进行分析。第一次循环中i的初值为1,然后变为5,将其累加到n中然后因其不满足If条件,所以i的值加上步长1(特别重要很容易忘记)继续循环;第二次循环开始i的值为6,加上4以后变为10,将其累加到n中然后因其不满足If条件,所以i的值加上步长1继续循环;第三次循环开始i的值为11,加上4以后变为15,将其累加到n中然后因其满足If条件退出循环,所以累加三次的值为5+10+15=30。