微信公众号原文web
系统:Windows 7
软件:Excel 2010微信
示例:调换两个变量对应的值,经过两种传递参数的方式(按值,按地址),看看效果svg
实现结果
spa
x=1 ,y=2
),有两个子过程,都是为了实现数值互换,一个是按值传递,一个是按地址传递主过程main
设计
Sub main()
x = 1
y = 2
Debug.Print ("转换以前")
Debug.Print ("x=" & x)
Debug.Print ("y=" & y)
Call 按值传递_转换顺序(x, y)
Debug.Print ("")
Debug.Print ("按值传递")
Debug.Print ("x=" & x)
Debug.Print ("y=" & y)
Call 按地址传递_转换顺序(x, y)
Debug.Print ("")
Debug.Print ("按地址传递")
Debug.Print ("x=" & x)
Debug.Print ("y=" & y)
End Sub
代码截图
3d
子过程1:按值传递code
Sub 按值传递_转换顺序(ByVal a, ByVal b)
'换顺序
c = a
a = b
b = c
End Sub
代码截图
xml
子过程2:按地址传递blog
Sub 按地址传递_转换顺序(a, b)
'换顺序
c = a
a = b
b = c
End Sub
代码截图
get
Sub的帮助文件
参数说明
Ps:那么一些特殊的变量类型,例如字典是否是也是按照这个标准去执行,你们不妨去试一下
更多精彩,请关注微信公众号
扫描二维码,关注本公众号