VB中怎么编一个程序？

来源：百度知道 编辑：UC知道 时间：2024/05/17 03:14:58
要求是 例如：I am a student 输出是：tneduts a ma I

Private Sub Command1_Click()
Text1.Text = StrReverse(Text2.Text)
End Sub

我比较笨 不会用函数 用了个笨办法

Private Sub Command1_Click()
Text2 = Text3
For xgn0607 = 1 To Len(Text3)
Text1 = Text1 & Right(Text2, 1)
Text2 = Left(Text3, Len(Text3) - xgn0607)
Next xgn0607
End Sub

注释：
text1到text3 三个文本控件

text1显示倒换后的内容
text2当个变量用
text3输入自己想转换的东西