ByRef表示该参数按地址传递。ByRef 是 Visual Basic 的缺省选项。
按值:一种将参数值而不是将地址传递给过程的方式,这就使过程访问到变量的复本。结果,过程不可改变变量的真正值。
按地址:一种将参数地址而不是将值传递给过程的方式,这就使过程访问到实际的变量。结果,过程可改变变量的真正值。除非另作说明,否则按地址传递参数。
简明一点说:以ByVal传递给过程,过程里有代码对这个变量做了更改,在过程结束返回后这个变量还是调用过程前的值,不会变化。以ByRef传递给过 程,过程里有代码对这个变量做了更改,在过程结束返回后这个变量的值就是过程里改成的那个值。
下面举个例子:
(1)ByVal示例
Sub TmpByVal()
Dim a As String
a = "2"
Call FunByVal(a)
MsgBox CStr(a)
End Sub
Function FunByVal(ByVal a)
a = "3"
End Function
(2)ByRef示例
Sub TmpByRef()
Dim a As String
a = "2"
Call FunByRef(a)
MsgBox CStr(a)
End Sub
Function FunByRef(ByRef a)
a = "3"
End Function
总结:vb(vba)中,除非你有足够的理由和有了足够的准备接受传址得来的值,都要使用ByVal来传值,ByRef意味梦魇的开始!但不要因为怕 ByRef就不用,而是要注意出现梦魇时要想到那可能是使用ByRef的结果。