Data Types VB.Net

Imports System
Class Sample
   Public Shared Sub Main()
      Dim m1 As Version = New Version("2.0"),     m2 As New Version("2.0")
      Console.WriteLine(m1.CompareTo(m2))
      Console.WriteLine(m1.CompareTo(CObj(m2)))
   End Sub 'Main
End Class