Visual Basic

Friend Class MyTestClass
    Public Property nr As Integer
    Public Property name As String
End Class

Dim mytest As New List(Of MyTestClass)

Dim k as integer=2

Dim s as string="123"

Private sub1()

     Dim item As MyTestClass = New MyTestClass With {.nr = k, .FieldName =s}

     mytest.Add(item)

     Messagebox.show(mytest.contains(item))

 End sub

Private Sub2 ()
    Dim item As MyTestClass = New MyTestClass With {.nr = k, .FieldName =s)

      Messagebox.show(mytest.contains(item))

End sub