问题
填空题
阅读程序：
Sub p(b () As Integer)
For i=1 To 4
b(i) =2(i
Next i
End Sub
Private Sub Command1_Click()
Dim a (1 To 4) As Integer
a(1)=5
a(2)=6
a(3)=7
a(4)=8
call p (a)
For i=1 To 4
Print a(i)
Next i
End Sub
运行上面的程序，单击命令按钮，输出结果为 ______。
答案
参考答案：2 4 6 8
解析： 本题综合考查 Sub过程的建立与调用以及数组的赋值。p过程为参数b()赋值，赋值方法为b()中的元素值等于其下标的 2倍。在事件过程中，数组a(1 to 4)先被逐一赋值，然后以传地址的方式被p过程调用。在调用中，a(i)被重新按照p过程的赋值方式(即元素值等于对应下标值的2倍)赋值。由于是以传地址的方式传送 a(1 to 4)，故在调用完p过程后，a(1 to 4)中的元素值将保留，故空白处填：2 4 6 8。