VBA中传递参数方式byval(副本)和byref(共有变量)

autumnalRain

vba 传递参数值时，分为Byval 和Byref
参数分为形参和实参:形参指的是过程名称中用括号括起来的参数，实参指的的是调用过程中，向过程传递的数据参数。可以理解为：形参相当于公式中的自变量，实参相当于使用公式时代入自变量中的具体数值。

Byref，地址传递参数，传递的是地址，过程操作的是变量的地址;
Byval，值传递参数，将变量的内容复制了一遍，过程操作的是另外一个变量，只不过这两个变量名称一样，值一样

Vba中，参数传递的默认方式是Byref，因为本质想法是对于相同命名的参数，在系统中采用同一个数值。

1. Sub TESTParameter()
   
2. Dim A As Integer, B As Integer
   
3. A = 1
   
4. B = 2
   
5. Call AAA(A, B)
   
6. Debug.Print A, B
   
7. Call BBB(A, B)
   
8. Debug.Print A, B
   
9. End Sub

复制代码

1. Sub BBB(ByRef A, ByRef B)
   
2. A = A + 1
   
3. B = B + 1
   
4. End Sub

复制代码

1. Sub AAA(ByVal A, ByvalB)
   
2. A = A + 1

复制代码

其中，call BBB（A，B）后，A=2，B=3
call AAA（A，B）后，A=1，B=2

值传递，相当于传的是一个副本，对于副本的操作不影响正本;地址传递，相当于是一个共有变量，传的是地址，该变量可以在过程中改变。
所以，联合编写程序时，我不希望自己的函数值受到别人的影响，通常会设定要按值传递，值传递只是将变量的内容复制一份而已，函数进行操作的其实是另一个变量，只是另一个变量的值和传递的变量值是相同的。而地址传递是直接把变量的地址传递给函数，这时函数是直接对原来的变量进行操作的。所以值会变化。
举例说吧：值传递就相当于克隆了一个同样的变量，操作的是克隆出来的那个，原来的变量没有变化，但是地址传递是直接对原来的变量进行操作，没有克隆新的变量。。。懂了吧，，，
也可以这样理解：比如要考试了，你有一份复习题，值传递就相当于别人借你的试卷去复印，然后在复印的那份上面做笔记，而地址传递就是别人直接在你原有的试卷上做笔记，没有复印，所以等你拿回来你会发现自己的试卷乱七八糟的，，，这下应该懂了哦。。。

lne3203

解释得非常形象！

DDBB2008

搜集学习，感谢分享

chis3

我一直也用byval的
但剛好遇上了問題才發現, 效能還是相差很大的
不要把數組以byval形式傳去子程序循環
等同不斷的複製數組, 非常吃效能
改以byref後瞬間計算完了