Question

How to override GetHashCode() method to get hash code for the current object in VB.NET

Answer 1

Public Class Point
    Private x As Integer
    Private y As Integer

    Public Sub New(x As Integer, y As Integer)
        Me.x = x
        Me.y = y
    End Sub

    Public Overrides Function GetHashCode() As Integer
        Return Tuple.Create(x, y).GetHashCode()
    End Function
End Class

Module Module1

    Sub Main()
        Dim pt As New Point(7, 3)
        Console.WriteLine(pt.GetHashCode())

        pt = New Point(3, 7)
        Console.WriteLine(pt.GetHashCode())
    End Sub

End Module

' run:
' 
' 228
' 100

 

70+ SQL courses for beginners and professionals

Answer 2

Public Class Point
    Private x As Integer
    Private y As Integer

    Public Sub New(x As Integer, y As Integer)
        Me.x = x
        Me.y = y
    End Sub

    Public Overrides Function GetHashCode() As Integer
        Return x Xor y
    End Function
End Class

Module Module1

    Sub Main()
        Dim pt As New Point(7, 3)
        Console.WriteLine(pt.GetHashCode())

        pt = New Point(3, 7)
        Console.WriteLine(pt.GetHashCode())
    End Sub

End Module

' run:
' 
' 4
' 4

 

70+ SQL courses for beginners and professionals