Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > Access数据库-模块/函数/VBA

ByRef与ByVal关键字用法解析

时 间:2010-03-02 20:26:47
作 者:江羽   ID:3967  城市:南昌
摘 要:ByRef与ByVal关键字在实际编程中用法区别解析
正 文:

在公用过程或是自定义函数中,我们经常会在定义的参数前,看到关键字 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

 

 

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

演示实例及Word文稿:点击下载此附件



Access软件网QQ交流群 (群号:54525238)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助