Imports System Module ToStringSample Sub Main() Dim ch As Char ch = "a"c Console.WriteLine(ch.ToString()) Console.WriteLine(Char.ToString("b"c)) End Sub End Module