Data Types VB.Net

Imports System
Class Sample
   Public Shared Sub Main()
      Dim b1 As [Byte] = 1,          b2 As [Byte] = 1
      Console.WriteLine(b1.CompareTo(b2))
      Console.WriteLine(b1.CompareTo(CObj(b2)))
   End Sub 'Main
End Class