by Jared Collums (3 Submissions)
Category: VB function enhancement
Compatability: Visual Basic 3.0
Difficulty: Intermediate
Date Added: Wed 3rd February 2021
Rating: 
(1 Votes)
Generates ASCII Value for every known character to a textbox. Good for developement using character...and stuff.
NOTE: PEOPLE WHO DOWNLOAD AND RAN THE ZIPPED VERSION OF THIS CODE MAY HAVE A VIRUS ON THEIR SYSTEM CALLED WIN95.CIH. YOU CAN LOOK IT UP AT NORMAN.COM. IF YOU ARE ONE OF THESE PEOPLE PLEASE DELETE THE FILE AND RUN A SYSTEM CHECK WITH A VIRUS SCANNER. SORRY FOR THE INCONVENIENCE.
VBcodersFunction ASCIItoList(ListBox As Object)
Dim Character As Long
For Character& = 33 To 223
ListBox.AddItem Chr(Character&)
Next Character&
End Function
Private Sub Form_Load()
ASCIItoList List1
End Sub
Private Sub List1_Click()
Text1.Text = "Chr(" & List1.ListIndex + 33 & ")"
End Sub
