Public Function StringRotateLeft( _ ByRef rValue As Variant _ ) As Integer
Assuming Dim S As String S = "ABC" for example StringRotateLeft(S) = 65 = Asc("A") leaves S = "BCA"See also:
StringRotateRight Function StringShiftLeft Function RotateStringLeft FunctionrValue: String whose characters are to be rotated left one position. Function returns -1 (the value of the AscEOF Property) if rValue is Null or cannot be fixed up to a String.
Function also returns -1 if rValue is an empty string.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.