单选题
下列程序的输出结果是( )。 Dim x As Integer Private Sub Command4_Click() Dim y As Integer x=1 y=10 Call fun(y,x) MsgBox"y="&Y End Sub Sub fun(ByRef y As Integer,ByVal z As Integer) y=y+z z=y-z End Sub
A、
y=1
B、
y=10
C、
y=11
D、
y=9
【正确答案】
C
【答案解析】
解析:函数参数包括按地址传递和按值传递两种方法,其中前者在函数体内改变变量值会影响参数外的变量,后者则不会。该题y是地址传递,调用fun()函数时,会改变y的值。故选择C选项。
提交答案
关闭