已知事件对应的程序代码如下: Private Sub CommandO_Click() Dim J As Integer J=100 Call GetData(J+5) MsgBox J End Sub

admin2019-05-23  30

问题 已知事件对应的程序代码如下:
    Private Sub CommandO_Click()
    Dim J As Integer
    J=100
    Call GetData(J+5)
    MsgBox J
    End Sub
    Private Sub GetData(ByRef f As Integer)
    f=f+120
    End Sub
    运行程序,则输出结果是

选项 A、100
B、120
C、125
D、225

答案A

解析 ByRef是指参数按地址传递,但是在这里面参数是一个表达式(J+5),表达式的结果会赋给一个Il缶时变量,然后把临时变量的地址传递给f,因此f的计算结果并不会影响J的值。
转载请注明原文地址:https://jikaoti.com/ti/Eio0FFFM
0

相关试题推荐
最新回复(0)