已知事件对应的程序代码如下:
Private Sub Command0 Click()
Dim J As Integer
J=100
Call GetData(J)
MsgBox J
End Sub
Private Sub GetData(ByRef f AS Integer)
f=f+120
End Sub
则程序的输出是( )。
【正确答案】 C
【答案解析】根据题意,程序代码中用Sub定义了2个过程:C0mmand0_Click()和GetData()。其中GetData的功能是将参数f的值增加1 20后再赋给f,且f为ByRef类型(即按地址传递)的参数,可将参数在过程中的改变传递到过程外。在过程C0mmand0_Click中定义了整型数据J=100,并将J作为GetData()函数的参数,在GetData()过程中形参为100且此参数为地址传递,经GetData()过程处理后增加120,变成220,同时在过程外部的J的值也变为220。最后输出变量J,因此选择C选项。