Data Types VB.Net

Imports System
Class Sample
   Public Shared Sub Main()
      Dim d1 As Int32 = 3,           d2 As Int32 = 3
      Console.WriteLine(d1.CompareTo(d2))
      Console.WriteLine(d1.CompareTo(CObj(d2)))
   End Sub 'Main
End Class