• Home
 · 
• String Manipulation
 · 
• Returns the reverse of a given string

Returns the reverse of a given string

Returns the reverse of a given string

Rate Returns the reverse of a given string

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Dim str As String
Dim i As Integer
For i = 1 To Len(Text1)
str = Right(Text1, i)
Text2 = Text2 + Left(str, 1)
Next i
End Sub
Private Sub Command2_Click()
Text1 = ""
Text2 = ""
Text1.SetFocus
End Sub