VB Code:
Dim strRecievedMessage as String For i = 1 To Len(strMessage) strRecievedMessage = strRecievedMessage & (Chr(Asc(Mid(strMessage, i, 1)) - 10)) Next i
This gives me runtime error '5', Invalid Procedure Call or Argument. It just moves the ASCII value down 10, what is the problem?




Reply With Quote