reverse a string

M

Mark

Hi,
I try reverse() and instrrev, but they don't work.

select reverse(field1) from table1.

Anyone knows how to solve it?
I use MS Access 2000
Thanks,
 
P

PC Datasheet

From my file ---

Function ReverseString(StrIngToReverse As String) As String
Dim i As Integer
For i = Len(StringToReverse) To 1 Step -1
ReverseString = ReverseString & Mid(strIn, i, 1)
Next i
End Function
Example:

ReverseString ("Mary had a little lamb") returns "bmal elttil a dah yraM"
 
Top