在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click()   d=0   c=10   x=Array(10, 12, 21, 32, 24)   For i=

admin2015-06-30  30

问题 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
Option Base 1
Private Sub Command1_Click()
  d=0
  c=10
  x=Array(10, 12, 21, 32, 24)
  For i=1 To 5
    If x(i)>c Then
      d=d+x(i)
      c=x(i)
    Else
      d=d-c
    End If
  Next i
  Print d
End Sub
程序运行后,如果单击命令按钮,则在窗体上输出的内容为(  )。

选项 A、89
B、99
C、23
D、77

答案C

解析 程序中Option Base 1语句指定数组下标下限从1开始。程序通过赋初值定义变量x为含有5个元素的数组,元素值依次为10, 12, 21, 32, 24。For循环的功能是把这5个元素中大于10且大于前一个元素的值累加到变量d中,如果小于等于10或前一个元素则从变量d减去10或前一个元素的值。因此d=0-10+12+21+32-32=23。
转载请注明原文地址:https://jikaoti.com/ti/Il60FFFM
0

最新回复(0)