问题
单项选择题
在窗体上画一个按钮，然后编写如下的事件代码。在按钮上单击，输出为( )。
Option Base 1
Private Sub fun (a()As Integer，n As Integer)
For i=1 To 2
t=a(i)：a(i)=a(5-i+1)：a(5-i+1)=t
Next i
End Sub
Private Sub Command1_Click()
Dim arr1(5)As Integer
For i=1 To 5
arr1(i)=i
Next i
Call fun(arr1，5)
Print arr1(1)；arr1(2)
End Sub
A．1 2
B．2 1
C．5 4
D．4 5
答案
参考答案：C
解析： 当发生Command1的Click事件时，定义了一个具有5个元素的数组arr1，并通过一个For循环给该数组各个元素赋值，赋值后arr(1)～arr(5)的值分别是1～5，然后调用过程fun。通过分析不难得出：过程fun的作用是把形参数组a的前n个元素逆序存放。由于数组作为参数是按地址传递的，所以对形参的修改也就是对相应实参数组的修改。执行函数调用“Call fun(arr1，5)”后，把arr1的5个元素逆序存放，最后输出的arr1(1)和arr1(2)的值应是5和4。