[Uzvern]

ЗАчем их искать, если можно тупо самому их узнать

Коды всех символов всего 255

Код:

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim RB As New RichTextBox
        RB.Dock = DockStyle.Fill
        Controls.Add(RB)
        For Chars As Integer = 0 To 255
            If Chars <> 255 Then
                RB.Text &= Chr(Chars) & " - " & Asc(Chr(Chars)) & Chr(13)
            Else
                RB.Text &= Chr(Chars) & " - " & Asc(Chr(Chars))
            End If
        Next
    End Sub
End Class

Об этом я знал, просто думал, что можно как-то ещё...