已知按钮Command0的Click事件对应的程序代码如下: Private Sub CommandO_Click( ) Dim J As Integer J = 20 Call GetData( J + 5 ) Msg

admin2021-04-27  21

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

选项 A、20
B、25
C、50
D、55

答案A

解析 常量与表达式在传递时,形参即便是传址(ByRef项)说明,实际传递的也只是常量或表达式的值,这种情况下,过程参数“传址调用”的“双向”作用形式就不起作用。本题中实参是表达式“J+5”,尽管形参前使用ByRef修饰,也不会影响实参“J”的值,故最终变量“J”的值仍是20,故本题选择A选项。
转载请注明原文地址:https://jikaoti.com/ti/awC0FFFM
0

最新回复(0)