Question

VB 参数传递：按值传递和按地址传递

有两问题：
问题一
Option Explicit
Dim a As Long
Sub s(ByRef b)
b = b + 1
End Sub

Private Sub Form_Click()
a = 8
s (a)
Print a
End Sub
输出结果为什么是“8”，而不是“9”。

问题二
参数传递的数量是不是只能一个？
比如:dim s(byval a,byref b)可以吗？
如果不可以那要进行多个值的传递该怎么办。

Answer 1

问题一
参数按地址传递,输出结果为什么是“8”，而不是“9”。因为变量a没作为参数传递。改s (a)为s a 或Print （a）试试。

问题二
参数传递的数量不是只能一个
比如: s(byval a,byref b)可以的

Answer 2

可以传递多个参数。 俺值传递的参数只是在过程中创建一个副本参与运算，不改变参数本身，如果你要输出的结果是9就应该按地址传递。