Encoder/decoder for String into Arrays of Integers
Version Compatibility: Visual Basic 6
Can be used as a very simple encryption/decryption method.
Dim o As New clsEncoder Dim iArr() As Integer, iCtr As Integer Dim s As String s = "This is a test" o.Encode s, iArr For iCtr = 0 To UBound(iArr) Debug.Print iArr(iCtr) Next MsgBox (o.Decode(iArr))
Instructions: Copy the declarations and code below and paste directly into your VB project.