<-- Previous || Up || Next -->

String Rotate Left Function
String Manipulations Class

Public Function StringRotateLeft( _
    ByRef rValue As Variant _
    ) As Integer

Rotates the characters within a string one position to the left, with the character at the beginning of the string being added onto the end of the string.
Returns the ASCII value of the character at the beginning of string rValue. (The character at the beginning of the string before the characters are rotated).

Example: 
    Assuming
       Dim S As String
       S = "ABC"
    for example
       StringRotateLeft(S) = 65 = Asc("A")
    leaves
       S = "BCA"
See also: 
    StringRotateRight Function
    StringShiftLeft Function
    RotateStringLeft Function
rValue: 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.