VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



Convert an entire sentance to ASC() code. nice for message boxes etc. Easy

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

Rate Convert an entire sentance to ASC() code. nice for message boxes etc. Easy



'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

Download this snippet    Add to My Saved Code

Convert an entire sentance to ASC() code. nice for message boxes etc. Easy Comments

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.

Post your comment

Subject:
Message:
0/1000 characters