第1个回答 2009-08-13
(1)ByRef
例如
function byr(byref a as integer)
a=10
end function
然后如果我们这样用
Dim x as integer
byr x
msgbox x
输出10
(2)ByVal
例如
function byv(byval a as integer)
a=10
end function
然后再
Dim x as integer
byv x
msgbox x
输出0,因为传值,无法返回。
注:数组、自定义类型只能通过ByRef传,因为他们不是一个值,是一组值,一组值就只能传内存地址了。