题目内容：
设有如下通用过程：Public Sub Fun（a（）, ByVal 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 Variant
For i = 1 To 5
arr（i） = i
Next
n = 10
Call Fun（arr（）, n）
Text1.Text = n
End Sub
程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。 A．10
B．15
C．25
D．24
参考答案：
答案解析：