byref和byval：一文读懂按地址传递(默认)和按值传递——vba

在vba中，经常用地调用子程序，参数传递分为：

byref ，被调用程序 按地址传递，传回主程序的参数，回调时会受影响。
按地址传递(ByRef），是指主程序直接将数据交给子过程（过程中定义传递方式），在过程中修改、调试、返回给主程序，主程序输出的是修改后的值。
VBA默认的是 byref方式
byval  ，被调用程序 按值传递，传回主程序的参数，回调时会不受改变。
按值传递（Byval），是指将主程序的值（副本一份）给子过程，过程对副本操作，主程序输出的仍是原值。若想输出值传递后的值，可在子过程中设置输出。

代码如下：

Sub test1(ByRef a)
a = a + 1
End Sub
 
Sub test2(ByVal b)
b = b + 1
End Sub
 
Sub main1()
'yngqq@2024年4月16日10:46:28
x = 1
y = 1
test1 x
test2 y
MsgBox "x=1,  y=1,调用子程序后：" & vbCr & "x=" & x & "    y=" & y
End Sub

运行结果：

 由此可见，byref会修改主程序变量值，而byval不会改变主程序变量值。