有如下程序: Private Sub Form_Click() Dim i As Integer,n As Integer For i=1 To 20 i=i+4:n=n+i Ifi>10 Then Exit For Next

admin2017-06-21  26

问题 有如下程序:
Private Sub Form_Click()
  Dim i As Integer,n As Integer
  For i=1 To 20
   i=i+4:n=n+i
   Ifi>10 Then Exit For
  Next
  Print n
End Sub
程序运行后,单击窗体,则输出结果是

选项 A、14
B、15
C、29
D、30

答案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。
转载请注明原文地址:https://kaotiyun.com/show/kPGp777K
0

最新回复(0)