• Home
 · 
• Encryption
 · 
• VERY EASY ENCRYPTION AND DECRYPT

VERY EASY ENCRYPTION AND DECRYPT

VERY EASY ENCRYPTION AND DECRYPTION CODE. VERY VERY VERY SIMPLE FOR

Rate VERY EASY ENCRYPTION AND DECRYPT

• 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