Member Avatar for Samuel_Watson

I'm trying to design an encryption program in which the text is converted into its ASCII Code Equivalent and then uses math to change the text and then convert the result into its ASCII Char. I have managed to convert the string I wish to encrypt into its ASCII Code but when it comes to doing the math for the next task I receive syntax errors. Where the exclamation is in the code below is where the code I'm having trouble is. Thanks in advance....

For Counter = 0 To UBound(CharArray)
            CipherText = CipherText & Asc(CharArray(Counter)) + 94
           ! Here I want to use an IF Statement to check if any of the ASCII Code exceed 126 and if so, subtract 37
        Next
  • 2 Contributors
  • 1 Reply
  • 237 Views
  • 11 Hours Discussion Span
  • Latest Post Latest Post by rproffitt
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.