• Home
 · 
• Custom Controls/Forms/Menus
 · 
• Simple Encryption... This encryption method alter the keyascii value of a string by adding 20.

Simple Encryption... This encryption method alter the keyascii value of a string by adding 20.

Simple Encryption... This encryption method alter the keyascii value of a string by adding 20.

API Declarations


'Create a Text and Command button
'You can you StrReverse keyword similar to transposition algorithm




Rate Simple Encryption... This encryption method alter the keyascii value of a string by adding 20.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

   Text1 = Ncrypt(Text1)
End Sub

'Copy and paste this code in a module
Function FrmCtrl(Str)
   
   For i% = 1 To Len(Str)
     x$ = Mid(Str, i, 1)
     Ncrypt = Ncrypt & Chr(Asc(x) + 20)
   Next i
End Function