by Jack Jarvis (6 Submissions)
Category: String Manipulation
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Fri 11th July 2008
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Convert an entire sentance to ASC() code. nice for message boxes etc. Easy
API Declarations
Create a form with a button and call convert
eg....
Sub button1_click
convert
end sub
'This Code was written by Jack Jarvis
'Any questions or comments please mail me [email protected]
Dim b As Integer
Dim c, d As String
Dim a As String
a = InputBox("Enter your Sentance", "DO IT", "HERE")
b = Len(a)
For c = 1 To b
d = Mid(a, c, 1)
d = "& Chr(" & Asc(d) & ") "
convert = convert & d
Next c
convert = "You Code you need is " & Mid(convert, 2, 1000)
InputBox "Here is your code", "DO IT", convert
End Function
No comments have been posted about Convert an entire sentance to ASC() code. nice for message boxes etc. Easy. Why not be the first to post a comment about Convert an entire sentance to ASC() code. nice for message boxes etc. Easy.