Mega Code Archive

 

Categories / VB.Net / Data Structure

 

List the Unicode code point of each of the control characters

Module ControlChars    Public Sub Main()       Dim charsWritten As Integer = 0       For ctr As Integer = &H0 To &HFFFF          Dim ch As Char = Convert.ToChar(ctr)          If Char.IsControl(ch) Then             Console.Write("\U{0:X4}    ", ctr)             charsWritten += 1              If (charsWritten Mod 6) = 0 Then                 Console.WriteLine()             End If              End If       Next    End Sub End Module