by Rev (4 Submissions)
Category: Files/File Controls/Input/Output
Compatability: Visual Basic 3.0
Difficulty: Unknown Difficulty
Originally Published: Sat 3rd November 2001
Date Added: Mon 8th February 2021
Rating:
(1 Votes)
VB3 - Generate a character table to a text file
Open "C:\chr.txt" For Output As #1 'The text to save to
For xn = 1 To 256 'Do 256 times
Print #1, "CHR$ " & n% & " equals : "; Chr$(n%) 'Write to text file
n% = n% + 1 'Increment by 1
If n% = 255 Then GoTo closeit 'If 255 characters have
'printed, then end
Next xn 'otherwise, keep going.
closeit: 'Close text file
Close #1