在VBScript程序员应用手册上看到这点,感觉很这本书很有用,发出来和大家分享。
定义方式:sub 过程名(byval 变量1,byref 变量2)
传值(byval):在sub过程中,定义成传值的话,对脚本级变量修改只限于过程中,过程结束,脚本级变量恢复原来的值。因为这种修改是临时的,可以想像成过程中的变量名虽然与脚本级变量名一样,但是对应不同的地址。
传址(byref):在sub过程中,定义成传址的话,对脚本级变量修改是永久的,过程结束,脚本级变量值变化。这种修改是对变量原址的修改,即对原变量的修改,是永久的。
例子(缘自《VBScript程序员应用手册》):-
- Option Explicit
- Dim lngA
- Dim lngB
- lngA = 1
- lngB = 1
- ByRefByValExample lngA, lngB
- MsgBox "lngA = " & lngA & vbNewLine & "lngB = " & lngB
- Sub ByRefByValExample(ByRef lngFirst, ByVal lngSecond)
- lngFirst = lngFirst + 1
- lngSecond = lngSecond + 1
- End Sub
复制代码 结果如下图:
[attach]5079[/attach] |