阅读程序: Option Base 1 Sub P(b( )As Integer) For i=1 T0 4 b(i)=2*i Next i End Sub Priva

admin2020-05-11  34

问题 阅读程序:
    Option Base 1
    Sub P(b(  )As Integer)
        For i=1 T0 4
           b(i)=2*i
        Next i
    End Sub
    Private Sub Fonn_Click(  )
        Dim a(4)As Integer
        For i=1 To 4
           a(i)=i+4
        Next i
        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://jikaoti.com/ti/pFx0FFFM
0

最新回复(0)