下列程序的功能是计算 1 到 1000 之间所有偶数之和,程序空白处应填写的语句是 Private Sub Command_Click() Dim x As Double For i=1 To 1000 If

admin2015-07-10  42

问题 下列程序的功能是计算 1 到 1000 之间所有偶数之和,程序空白处应填写的语句是
Private Sub Command_Click()
      Dim x As Double
      For i=1 To 1000
          If _______ Then
              x = x + i
       End If
     Next i
     Debug.Print x
  End Sub

选项 A、8  7  6
B、7  6  5
C、7  6  5  4
D、8  7  6  5

答案B

解析 本题考查While...Wend循环语句。若n大于5,反复执行n = n - 1的操作,之后打印输出。本题中n初始值为8,满足n大于5的条件,进入第一次循环,执行n=8-1=7,打印输出7;n为7,满足循环条件,进入第二次循环,执行n=7-1=6,打印输出6;;n为6,满足循环条件,进入第三次循环,执行n=6-1=5,打印输出5;n为5不再满足循环条件,跳出循环。因此输出结果为7  6  5。
转载请注明原文地址:https://kaotiyun.com/show/IFgp777K
0

最新回复(0)