• Home
 · 
• Encryption
 · 
• This Is Very Simple And Easy To Use Encrytption And Decryption. Click Here, You'll Regret It If You

This Is Very Simple And Easy To Use Encrytption And Decryption. Click Here, You'll Regret It If You

This Is Very Simple And Easy To Use Encrytption And Decryption. Click Here, You'll Regret It If You Don't!

Rate This Is Very Simple And Easy To Use Encrytption And Decryption. Click Here, You'll Regret It If You

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Private Sub txtText_KeyPress(KeyAscii As Integer)
Dim Text
Text = Chr(KeyAscii + 10)
txtEncrypt.Text = txtEncrypt & Text
End Sub

'To Decrypt Use The Following(Put The Encrypted Text In Where You Are To Type, Then Add This Code Instead Of Code Above:
Private Sub txtText_KeyPress(KeyAscii As Integer)
Dim Text
Text = Chr(KeyAscii - 10)
txtEncrypt.Text = txtEncrypt & Text
End Sub