一道VB题 求解答

Question

（8）窗体上有名称为Command1的命令按钮。事件过程及2个函数过程如下：
Private Sub Command1_Click()
Dim x As Integer, y As Integer, z
x = 3
y = 5
z = fy(y)
Print fx(fx(x)), y
End Sub
Function fx(ByVal a As Integer)
a = a + a
fx = a
End Function
Function fy(ByRef a As Integer)
a = a + a
fy = a
End Function
运行程序，并单击命令按钮，则窗体上显示的2个值依次是【12】12和【13】10。
我知道第二个空是填10，但第一个空我觉得是3啊，因为传值形式不是不改变实参的大小吗？x不是始终是3吗？

Answer 1

依次是【12】12和【13】10。

这是对的...因为他 Print 的是 fx(fx(x)), y

不是 x, y

x 是 3 没错,但 fx(fx(x)) 是 12

Answer 2

你只有一个print语句。
输出应该是12和10.
fx(fx(x))，是做两次计算，最里面的括号fx（x）的结果是6，再进行一次fx（），得12.，但计算到最后，x的值也一直没变，始终是3.

不知道你能不能理解。

Answer 3

我觉得你好像没搞清除function fx 和function fy的意思，function 表示定义函数。如下
Function fx(ByVal a As Integer)
其中ByVal a As Integer表示函数fx中的自变量为a
a = a + a
fx = a
End Function
Command1_Click() 事件中print fx(fx(x)),相当于调用了两次fx函数。
第一次调用，a=x=3,即fx(3)=3+3=6
第二次调用，a=fx(3)=6 ,即fx(6)=6+6=12

其它的不说了，其他人都说的挺好！

Answer 4

fy(ByRef a As Integer)这个是按地址传植，形参值的改变会影响实参的值！