阅读程序: Sub p(b () As Integer) For i=1 To 4 b(i) =2(i Next i End Sub Private Sub Command1_Click()

admin2013-01-23  35

问题 阅读程序:
   Sub p(b  ()  As Integer)
     For i=1 To 4
       b(i)  =2(i
     Next  i
   End Sub
   Private Sub Command1_Click()
     Dim a  (1 To 4)  As  Integer
             a(1)=5
             a(2)=6
             a(3)=7
             a(4)=8
     call p  (A)   For i=1 To 4
             Print a(i)
     Next  i
   End Sub
   运行上面的程序,单击命令按钮,输出结果为 ______。

选项

答案2 4 6 8

解析 本题综合考查 Sub过程的建立与调用以及数组的赋值。p过程为参数b()赋值,赋值方法为b()中的元素值等于其下标的 2倍。在事件过程中,数组a(1 to 4)先被逐一赋值,然后以传地址的方式被p过程调用。在调用中,a(i)被重新按照p过程的赋值方式(即元素值等于对应下标值的2倍)赋值。由于是以传地址的方式传送 a(1 to 4),故在调用完p过程后,a(1 to 4)中的元素值将保留,故空白处填:2 4 6 8。
转载请注明原文地址:https://jikaoti.com/ti/XtO0FFFM
0

最新回复(0)