设有如下通用过程:Public Sub Fun(a(),By Val x As Integer)Fori=1 To 5x=x＋a(i)NextEnd Sub在窗

设有如下通用过程： Public Sub Fun(a()，By Val x As Integer) Fori=1 To 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Commandl的命令按钮，然后编写如下的事件过程： Private Sub Commandl_Chck() Dimart(5)As Variant Fori=1 To 5 arr(i)=i

A．10

B．15

C．25

D．24