Compare two Char values
Imports System Class Sample Public Shared Sub Main() Dim i1 As [Char] = "A"c, i2 As [Char] = "A"c Console.WriteLine(i1.CompareTo(i2)) Console.WriteLine(i1.CompareTo(CObj(i2))) End Sub 'Main End Class