未分类题

设有如下通用过程: Public Sub Fun(a(), ByVal x As Integer) For i=1 To 5 x = x + a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下的事件过程: Private Sub Commandl 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

A.Text=n
B.10
B.15
C.25

【参考答案】

A
解析:本题主要考查传值与传地址的区别。Fun过程中参数a()的传送方式为传地址,参数x的传送方式为传值。当在......

(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)