ByVal与ByRef的区别
说去二者之间的区别，就在于其传递的是什么，也许这句话很模糊，我们来做一下解释。
1、ByVal-按值传递，也就是说，我们传递给函数是一个单纯的数值过去，如下代码来帮助我们理解：
| 代码如下 | 复制代码 |
|
Sub Run() Dim i As Integer i = 1 Add i MsgBox i End Sub Sub Add(ByVal i As Integer) i = i + 3 End Sub |
|
上述代码，最后对话框中显示的i值还是1，因为编译器，或者是说Vba的解析器会对其传递的i创建一个副本，用于Add过程中的计算。
2、ByRef-按地址传递，类似于C、C++或者是ObjectPascal等语言中的指针，其会传递一个全局的内存地址给函数（过程），当函数在运算过程中修改了你所传递的参数时，那么这个值会被延伸下去，为了便于理解，大家来看一下如下的代码：
| 代码如下 | 复制代码 |
|
Sub Run() Dim i As Integer i = 1 Add i MsgBox i End Sub Sub Add(ByRef i As Integer) i = i + 3 End Sub |
|
这段代码与，前一段代码只有一个区别，就是将Add过程中参数i的传递方式由ByVal修改成了ByRef，但运算结果会完全不同，Msgbox对话框，最后给出的结果是4。
通过上述两个代码，大家是否对ByVal与ByRef这两种参数传递方式有了比较好的理解呢？
注意事项
值得我们各位童鞋注意的是，Vb/Vba默认的参数传递方式为ByRef，也就是说ByRef是可以省略的，这个与其他的语言不太相同。
时间： 2024-09-19 23:57:40