How to write sentences in Ascii code

[Sir Loin]

I recently got the idea to write a program that changes everything you type into something else. I tried writing it and it didn't work, but I know it can be done. If someone knows how to do this reply please...

Here is my code

Private Sub Form_keypress(keyascii As Integer)
If (keyascii >= 32) And (keyascii <= 126) Then
keyascii = ' what i make it say
End If
End Sub

I need to make it work.