设有如下通用过程： Public Sub Fun(a()As Integer,x

问题单项选择题

设有如下通用过程：
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 AsInteger
　　For i=1 To 5
　　　arr(i)=i+i
　　Next
　　Fun arr,n
　　Text1.Text=Str(n)
End Sub
程序运行后，单击命令按钮，则在文本框中显示的内容是( )。