单选题 设有如下通用过程: 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
【答案解析】[分析] 在Command1_Click过程中,数组arr(1)~arr(5)的初值为2、4、6、8、10,在子函数Fun中,数组arr的内容传送给数组a,在For-Next循环中将其内容相加起来的30赋给变量x,x的内容按地址传送的方式传给变量n,函数Str将n的内容转换成字符串在Text1中显示出来。