byval 对引用类型无效么？？

[2303191]

Public Class Class2
Public a As Integer

End Class



Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim a As New Class2
a.a = 5
ccc(a)
TextBox1.Text = a.a


End Sub


Public Sub ccc(ByVal b As Class2)


b.a = 3



End Sub


End Class


输出3

[cfreez]

right
byref

[magicbacon]

我的理解是这里的b只是形参，所以只存在一个引用a，不管用ByRef还是ByVal都是输出3。

[magicbacon]

在该函数运行时，形参和实参是不同的变量，它们在内存中位于不同的位置，形参将实参的内容复制一份，在该函数运行结束的时候形参被释放，而实参内容不会改变。