Public Class MainClass Public Shared Sub Main() 'Character Declarations Dim chrLtr_a As Char = "a"c Dim chrAsc_a As Char = Chr(97) Dim chrAsc_b As Char = ChrW(98) Dim bytLtrA As Byte = Asc("a") Console.WriteLine(chrLtr_a) Console.WriteLine(chrAsc_a) Console.WriteLine(chrAsc_b) Console.WriteLine(bytLtrA) End Sub End Class