vb中字符串逆转输出处理

Question

vb中如何编程使字符串(输入,中文,英文)逆转输出..
希望各位VB高手或计算机编程高手多多指教....
或在这里SHOW SHOW你的技术也可以...
不好意思之前没有说明白....我要的是初级的编程...也就是指在文本框中1输入一个字符串..而文本框2就会立即对文本框1中字符串的数据进行逆转输出....也就是这样了...要是说是在文本框1中输入数据后按一下按钮Cammand1之后才在文本框2中显示出文本框1中的数据逆转输出也可以....谢谢....

Answer 1

不知道我对你的提问理解正确没有
StrReverse 返回一个字符串，其中一个指定子字符串的字符顺序是反向的。
看是不是你要的.
################################
看一下我根据你的要求写出程序
Private Sub Text1_Change()
Text2.Text = StrReverse(Text1.Text)
End Sub
我运行了。效果符合你的要求,希望对你有所帮助

Answer 2

用的着这么费事吗?
有很多种方法可以实现.
1.在TEXT1用输入.立刻在TEXT2中显示逆转.(不适合复制粘贴的.)
Private Sub Text1_KeyPress(KeyAscii As Integer)
Text2.Text = Chr(KeyAscii) & Text2.Text
End Sub
2.按COMMAND后逆转.
Dim i As Integer
If Len(Text1.Text) <> 0 Then '该语句为判断目标字符不为空.
For i = 1 To Len(Text1.Text)
Text2.Text = Mid(Text1.Text, i, 1) & Text2.Text
Next
End If

以上代码没经过优化.全为学习VB时的最初级代码.可以自己优化一下.

Answer 3

我改了一下,你建立2个text,然后把代码复制过去试试,绝对没问题!
Private Sub Text1_Change()
Dim a As String, b As String, c As String
a = Text1.Text
c = Len(a)
For i = c To 1 Step -1
a = Left(a$, i)
b = b$ + CStr(Right(a$, 1))
Text2.Text = b
Next i
End Sub