阅读程序: Option Base 1 Sub P(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Form_Cli

admin2020-04-18  25

问题 阅读程序:
  Option Base 1
  Sub P(b()As Integer)
      For i=1 To 4
          b(i)=2*i
      Next i
  End Sub
  Private Sub Form_Click()
      Dim a(4) As Integer
      For i=1 To 4
          a(i)  =i  +4
      Next i
      P  a
      For i=1 To 4
      Print a(i)
      Next i
      End Sub
运行上面的程序,单击窗体,输出结果为(    )。

选项 A、2
4
6
8
B、5
6
7
8
C、10
12
14
16
D、4
8
12

答案A

解析 Form_Click过程中首先对a数组用For循环赋值。然后调用过程P。注意P参数传递是引用传递,因此数组a的元素值在执行P过程后会被改变。之后的For会输出变量值是过程P中对数组元素的赋值。选A。
转载请注明原文地址:https://kaotiyun.com/show/jaTp777K
0

最新回复(0)