Question

急~~~~~~在线等！！简单VB编程，将字符反向输出

不用StrReverse函数，编程将输入的字符串反向输出。要求用left、right或者left和right联合编写一个程序
谢啦~~~~~
要求从文本框中输入字符串，单击反向输出按钮式，在另一个文本框中输出反向字符串

Answer 1

Private Sub Command1_Click()
For i = 1 To Len(Text1)
s = s & Left(Right(Text1, i), 1)
Next
Text2 = s
End Sub

Answer 2

Private Sub Command1_Click()
s=Text1
m=Len(s)
For i=1 To m
k=k & SubStr(S,m-i+1,1)
Next
Text2=k
End Sub

Answer 3

Sub Command1_Click()
Text2.Text = ""
For i = 1 To Len(Text1.Text)
Text2.Text = Text2.Text & Left(Right(Text1.Text, i), 1)
Next
End Sub

Answer 4

Private Sub Command1_Click()
Dim StrTmp As String
For i = 1 To Len(Text1.Text)
StrTmp = Right(Text1.Text, i)
Text2.Text = Text2.Text & Left(StrTmp, 1)
Next
End Sub