I occasionally need to know the ASCII representation of a character. This simple agent allows the user to enter that character, either by copy/paste or by typing, and then returns that ASCII value.
Sub Initialize asciiTemp$ = Inputbox ( "Enter the character", "ADD" ) Msgbox "Numeric code for the character " + Chr$(34) + asciiTemp$ + Chr$(34) + "= " + Cstr(Asc(asciiTemp$)), ,"ADD" End Sub
Do you have comments on this tip? Let us know.
This tip was submitted to the SearchDomino.com tip exchange by member Darrell Clendennen. Please let others know how useful it is via the rating scale below. Do you have a useful Notes/Domino tip or code to share? Submit it to our monthly tip contest and you could win a prize and a spot in our Hall of Fame.
This was first published in December 2004