设有如下通用过程:Public Sub Fun(a(),ByVal x As Integer)For i=1 To 5 x=x+a(i)NextEnd Sub在

设有如下通用过程: 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

时间:2023-03-19 11:10:40

相似题目