Public Function StringRotateRight( _
ByRef rValue As Variant _
) As Integer Assuming
Dim S As String
S = "ABC"
for example
StringRotateRight(S) = 67 = Asc("C")
leaves
S = "CAB"See also: StringRotateLeft Function
StringShiftRight Function
RotateStringRight FunctionrValue: 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.