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

String Rotate Right Function
String Manipulations Class

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

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

       Dim S As String
       S = "ABC"
    for example
       StringRotateRight(S) = 67 = Asc("C")
       S = "CAB"
See also:
    StringRotateLeft Function
    StringShiftRight Function
    RotateStringRight Function
rValue: String whose characters are to be rotated right 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.