Question

vb6.0 关于传值传址

Public Sub swap1(ByVal x As Integer, ByVal y As Integer) '传值 Dim t As Integer t = x: x = y: y = t End Sub Public Sub swap2(x As Integer, y As Integer) '传址 Dim t As Integer t = x: x = y: y = t End Sub Private Sub Form_Cl... Public Sub swap1(ByVal x As Integer, ByVal y As Integer) '传值 Dim t As Integer t = x: x = y: y = t End Sub Public Sub swap2(x As Integer, y As Integer) '传址 Dim t As Integer t = x: x = y: y = t End Sub Private Sub Form_Click() Dim a As Integer: Dim b As Integer a = 10: b = 20 swap1 a, b Print "A1="; a, "B1="; b a = 10: b = 20 swap2 a, b Print "A2="; a, "B2="; b End Sub 为何最后出来的是 A1= 10 B1=20 A2=20 B2=10 可否请大神分析一下过程？ T A T 展开

Answer 1

swap1是传值，所以它内部对x和y做任何修改都不会影响到a和b的值，所以swap1运行完毕后a和b的值是不变的；
而swap2是传址，所以x与a、y与b所指向的是同一个内存地址，换句话说就是它们实际上是同一个变量，所以函数内部对x和y所做的任何修改都会直接反映到a和b，因此swap2运行完毕后a和b的值就互相换过来了。
传值和传址的通俗理解：
1、传值是把参数的值传递给函数，也就是说，你把银行账户的余额告诉别人，别人是不会把你的钱取走的，他只不过是知道你有多少钱而已；
2、而传址则是把参数的内存地址传递给函数，也就相当于你把银行账户的帐号密码告诉别人了，这个会有什么结果就自己去想了。