Question

关于形参与实参值传递的问题？

Private Sub Form_Click()
Dim a As Integer, b As Integer, c As Integer
a = 1: b = 2: c = 3
Call ff(a, b + 1, 2)
Print a, b, c
Call ff(a, b, c)
Print a, b, c
End Sub
Sub ff(ByVal a As Integer, b As Integer, ByVal c As Integer)
a = a + 1
b = b + 1
c = c + 1
End Sub
这个结果为什么是
1 2 3
1 3 3

Answer 1

函数传递方式两种，一种是传值，在VB中用关键词ByVal说明，还有一种是传址，VB默认是传址。

传址如果函数里改变了参数的值，那调用函数的地方实参也会跟着改变，传值函数改变其形参值实参不改变。

综合来看只有b是传址，所以b在函数体内执行了b=2+1=3，所以输出了这个结果。

追问

Call ff(a, b + 1, 2)
Print a, b, c
这个结果为什么是1 2 3
就是不清楚为什么b的值是2

追答

因为第一次调用是你写的b+1，这里会建立一个临时变量，传给函数是这个临时变量的地址，不是b的，第二次参数是b,传的是b的地址

Answer 2

：调用函数有2种方式，传值和传地址。 传值，就是你现在程序中的调用方式，这样不能够改变传递进来实参的值。 传地址，就是形参是引用或者是指针，这样才能改变传递进来实参的值。 这就是区别。

追问

能写个详细的过程吗

Answer 3

这没有啥详细过程
a）不要在函数内和函数外定义同名变量来混淆自己，不利于你理解
b）对于byref形参，用b+1参数带入应该是错误，在错误行为下的结果不可预知，这应该是编译器的bug