VB函数中两种参数的区别

在各种编程语言中调用函数或过程时，都需要使用参数。ＶＢ中使用的参数比较特殊，有两种类型：引用参数和传值参数。正确理解这两种参数对实际编程工作会有很大帮助。
?在函数或过程中使用一个参数时，仅使用其值而不能改变其初值，这样的参数称为传值参数，而在使用中初值可以被改变的参数则称为引用参数。在函数或过程中对于引用参数使用的是它本身，某些操作可能会改变参数原来的值；而对于传值参数，则可以理解为操作的是它在另一个地址存储的一个复制品，尽管这个复制品的值可能发生变动，却不会影响传值参数自身。
?下面通过一个例子来说明这两种参数的区别：
?１、在某窗体的通用说明区中编写一个自定义函数Ｄｏｕ—ｂｌｅ 如下：
?Ｆｕｎｃｔｉｏｎ Ｄｏｕｂｌｅ （Ａ Ａｓ Ｉｎｔｅ—ｇｅｒ）?Ａ＝８?Ｄｏｕｂｌｅ ＝２＊Ａ?Ｅｎｄ Ｆｕｎｃｔｉｏｎ?这是一个非常简单的求一个数的两倍的函数，其中参数Ａ 定义为整型，是引用参数。
?２、在窗体中放置一个按钮ｃｏｍｍａｎｄ１，编写ｃｏｍｍａｎｄ１＿ｃｌｉｃｋ（）过程如下：
?Ｐｒｉｖａｔｅ Ｓｕｂ ｃｏｍｍａｎｄ１＿ｃｌｉｃｋ（）?Ｄｉ ｍ Ａ Ａｓ Ｉｎｔｅｇｅｒ?Ｄｉ ｍ Ｂ Ａｓ Ｉｎｔｅｇｅｒ?Ａ＝６?Ｂ＝Ｄｏｕｂｌｅ（Ａ）?Ｐｒｉｎｔ ＂Ａ＝＂＋Ｓｔｒ＄（Ａ）?Ｐｒｉｎｔ ＂Ｂ＝＂＋Ｓｔｒ＄（Ｂ）?Ｅｎｄ Ｓｕｂ
?在本过程中将Ａ 赋初值６，以Ａ 为参数调用函数Ｄｏｕｂｌｅ ，返回值保存在Ｂ中。运行程序，结果为：
?Ａ＝８?Ｂ＝１６
?从运行结果可以看出，虽然在过程ｃｏｍｍａｎｄ１＿ｃｌｉｃｋ（）中给Ａ 赋初值６，但在语句Ｂ＝Ｄｏｕｂｌｅ （Ａ）调用函数Ｄｏｕｂｌｅ 后，Ｄｏｕｂｌｅ 函数中又给Ａ 重新赋了值（Ａ＝８），从而影响函数的返回值，引用参数Ａ 的初值也被改变。
?如果将Ｄｏｕｂｌｅ 函数的参数说明项改为（Ｂｙ Ｖａｌ ＡＡｓ Ｉｎｔｅｇｅｒ），用Ｂｙ Ｖａｌ 将Ａ说明为传值参数，再运行程序，结果为：?Ａ＝６?Ｂ＝１６
?这是由于使用Ｂｙ Ｖａｌ 将Ａ 定义为传值参数，在调用Ｄｏｕｂｌｅ 函数时，只是将Ａ 的值传给该函数使用，尽管函数中对Ａ 重新赋了值，但只是对Ａ 的复制品进行操作并影响到函数的返回值，却并不涉及ｃｏｍｍａｎｄ１＿ｃｌｉｃｋ（）过程中的Ａ 本身，因此输出的结果中Ａ 的初值仍为６。?