Access vba中参数前关键字ByRef和ByVal的详细解释_access模块-access类模块-access函数-access VBA

当前位置：主页 > 技巧 > Access技巧 > 模块函数VBA > 正文

Access vba中参数前关键字ByRef和ByVal的详细解释

时间：2013-10-18 15:05 来源：office中国作者：江羽阅读：次

在公用过程或是自定义函数中，我们经常会在定义的参数前，看到关键字 ByRef 或 ByVal ，它们起什么作用呢？它们又有什么区别呢？我们先看一段代码。

过程实例代码：

Sub CallByRef(ByRef Y as Integer ) ‘代码中Y 及为输入的参数

Y = 2

End Sub

当我们调用这个过程时，可以用两种方式来传送参数，即：传址方式（也称：引用方式）和传值方式。如果以传址方式传送，加入关键字ByRef ；如果以传值方式传送，则加上关键字ByVal。

ByRef 表示该参数按地址传递。 ByRef 是 Visual Basic 的缺省选项。直白的说这传递方式所传递的是参数的地址，因此当两个变量指向同一个内存地址时，其中一个变量改变，别一个变量也会随之变化。

见如下实例：

'**************************************

'用“传址”方式传递参数

'**************************************

Private Sub Command0_Click()

Dim X As Integer

X = 1

MsgBox "调用程序之前X值是：" & X

Call CallByRef(X)

MsgBox "调用程序之后X值是：" & X

End Sub

'默认方式是传址方式传递参数，可以不加 ByRef 关键字

Sub CallByRef(ByRef Y As Integer)

Y = Text2

End Sub

ByVal 表示该参数按值传递，可选。如果不希望调用的程序修改原调用端的变量值，可以加入该关键字，这保证了该变量有自己独立内存区域或者说空间，而不会受到调用端变量的影响。只会把传递的变量值重新复制一份给调用的程序，所以即使在程序内变更参数的值，也不会改变原调用端的参数值。

见如下实例：

'**************************************

'用“传值”方式传递参数

'**************************************

Private Sub Command1_Click()

Dim X As Integer

X = 1

MsgBox "调用程序之前X值是：" & X

Call CallByVal(X)

MsgBox "调用程序之后X值是：" & X

End Sub

'以传值方式传递参数，必须加上 ByVal 关键字

Sub CallByVal(ByVal Y As Integer)

Y = Text2

End Sub

-----------------------------------------------------------------------------------------------------------------

(责任编辑：admin)

顶一下

(3)

100%

踩一下

(0)

上一篇：Access列表框快速全选的技巧【最快】
下一篇：Access中EXIT Sub与End Sub的区别