下面代码中可以看到,为什么相同的类clas1和clas2比较时不相同呢?
Sub MySub()
Dim Clas1, Clas2 As New Class1
Clas1.Equals(Clas2) '返回到False
Dim i = Clas1 Is Clas2 '返回到False
End Sub
------解决方案--------------------
类是引用类型,结构是值类型。
------解决方案--------------------
结构是值对象,用内容比较。
Sub MySub()
Dim Clas1, Clas2 As New Class1
Clas1.Equals(Clas2) '返回到False
Dim i = Clas1 Is Clas2 '返回到False
End Sub