单选题阅读程序：Option Base 1Sub P(b() As Integer) For i=1 To 4 b(i)=2*i Next i End SubPrivate Sub Form_Click()Dim a(4)As Integer For i=1 To 4 a(i)=i+4 Nex i P a For i=1 To 4 Print a(i) Next iEnd Sub运行上面的程序，单击窗体，输出结果为

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

【正确答案】 A

【答案解析】解析：本题中的过程P的功能是为形参数组b进行赋值，数组作为参数时采用的是地址传递，所以对形参的改变将会影响实参，也就是在窗体的单击事件中，首先在一个循环中为数组a赋值，然后调用了P过程重新为a赋值覆盖掉原来的值。