![[单项选择题] 设有如下通用过程： Public Sub Fun(a() As Integer, x As Integer) For i=1 To 5 x=x+a(i) Next End S](http://www.mshxw.com/aiimages/31/251212.png "[单项选择题] 设有如下通用过程： Public Sub Fun(a() As Integer, x As Integer) For i=1 To 5 x=x+a(i) Next End S")
[单项选择题] 设有如下通用过程：
Public Sub Fun(a() As Integer, x As Integer)
For i=1 To 5
x=x+a(i)
Next
End Sub
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程：
Private Sub Command1_Click()
Dim arr(5)As Integer, n As Integer
For i=1 To 5
art(i)=i+i
Next
Fun arr, n
Text1. Text=Str(n)
End Sub
程序运行后，单击命令按钮，在文本框中显示的内容是______。
A．30
B．25
C．20
D．15
参考答案：
A解析：[分析]： 在Command1_Click过程中，数组arr(1)～arr(5)的初值为2、4、6、8、10，在子函数Fun中，数组arr的内容传送给数组a，在For-Next循环中将其内容相加起来的30赋给变量x，x的内容按地址传送的方式传给变量n，函数Str将n的内容转换成字符串在Text1中显示出来。问题解析:
解析无
