VB　存址参数,通过操作参数的内存地址实现全局控制

Sub Test(ByRef a As Integer, ByVal b As Integer) 子过程

a = 3

b = 4

End Sub

Sub main() 主程序

Dim a As Integer

Dim b As Integer

a = 1

b = 2

Test a, b

MsgBox "a=" & a & ";b=" & b

End Sub

输出结果 a=3;b=2

按地址传递与按值传递区别：

按地址传递，是指主程序主程序直接将数据交给子过程（过程中定义传递方式），在过程中修改、调试、返回给主程序，主程序输出的是修改后的值。

按值传递（Byval），是指将主程序的值（副本一份）给子过程，过程对副本操作，主程序输出的仍是原值。若想输出值传递后的值，可在子过程中设置输出。