阅读程序: Option Base 1 Sub P(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Prirate Sub Form_Click() Dim a(4)As Integer For i=

admin2019-06-11  29

问题 阅读程序:
Option Base 1
Sub P(b()As Integer)
For i=1 To 4
b(i)=2*i
Next i
End Sub
Prirate Sub Form_Click()
Dim a(4)As Integer
For i=1 To 4
a(i)=i+4
Next 1
P a
For i=1 To 4
Print a(i)
Next i
End Sub
运行上面的程序,单击窗体,输出结果为

选项 A、2
4
6
8
B、5
6
7
8
C、10
12
14
16
D、4
8
12
16

答案A

解析 Form_Click过程中首先对a数组用For循环赋值。然后调用过程P。注意P参数传递是引用传递,因此数组a的元素值在执行p过程后会被改变。之后的For输出变量值是过程P中对数组元素的赋值。选A。
转载请注明原文地址:https://kaotiyun.com/show/NDUp777K
0

随机试题
最新回复(0)