List.Contains 返回 false，尽管看起来它应该返回 true

Sub pageload() Handles Me.Load
    Dim bom As New List(Of Car)

    Dim car1 As New Car With {.Name = "Pea", .Year = 2}
    Dim car2 As New Car With {.Name = "Pea", .Year = 2}

    bom.Add(car1)

    MsgBox(bom.Contains(car2))
End Sub

为什么？？？我的意思是该对象具有完全相同的数据，那么为什么它说它不包含呢？

The Contains方法通过调用来测试相等性Equals对象上的方法。除非你覆盖Equals方法中的Car类并实现您自己的比较方法、实例Car将被认为是平等的参考身份（是完全相同的对象）不是基于它们的内容相等。

您创建的那些对象绝对不是同一个对象。证明：改变一个不会改变另一个。