Public Function StringShiftLeft( _
ByRef rValue As Variant _
) As Integer Assuming
Dim S As String
S = "ABC"
for example
StringShiftLeft(S) = 65 = Asc("A")
leaves
S = "BC"See also: StringShiftRight Function
StringRotateLeft Function
ShiftStringLeft FunctionrValue: String whose characters are to be shifted 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.