How to get all characters

If you ever need to get all the characters for you program. Say you're making an ascii program and need special characters. This is very simple to do.

Button

Listbox

In the button add the following code.

For i = 33 To 255

List1.AddItem (Chr$(i))

Next i

i = Empty

That's it. Enjoy

For no spaces you could use these.

33 To 42 ' Basic symbols

1 To 27 ' Special

43 To 127 'Basic Letters, Symbols

128 To 255 ' Special