设有如下通用过程： 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 程序运行后，单击命令按钮，则在文本框中显示的内容是( )。

A．30

B．25

C．20

D．15

（）有四位有效数字。

A.0.0401

B.0.0100

C.0.05010