Reverse a string without using StrReverse


MyStr = inputbox("We Set Science in motion to create a better world")
nCnt = Len(MyStr)

For i = 1 to nCnt
   RevStr = Mid(MyStr,i,1)&RevStr
Next

Msgbox RevStr

Comments

Popular posts from this blog

UFT File Types and File Extensions

QTP/UFT Version History

Synchronization in UFT