How to do string reverse in qtp

How to do string reverse in qtp

How to do string reverse in qtp

Dim String1, String2, StringLength, i

String1 = “Happy Valentine’s Day”
StringLength = len(String1)

For i = StringLength To 1 step -1

String2 = String2 & mid(String1, i, 1)

Next

Msgbox String2

String reverse in qtp

Dim String1, String2, StringLength, i

String1 = “Shalima Prakash”
StringLength = len(String1)

For i = StringLength To 1 step -1

String2 = String2 & mid(String1, i, 1)

Next

Msgbox String2