Imports System
Public Class Program
Public Shared Sub Main()
Dim decimal1 As Decimal = 7483.891D
Dim decimal2 As Decimal = 87.97434D
Dim decimal3 As Decimal = -9.387367D
Console.WriteLine(decimal1.GetHashCode())
Console.WriteLine(decimal2.GetHashCode())
Console.WriteLine(decimal3.GetHashCode())
End Sub
End Class
' run
'
' 1479429972
' -696437365
' 931913524
'