你知道吗？VB将一串字符串反向输出最快捷的方式！

VB反向输出字符串

首先，我们需要在窗体上添加两个文本框控件和两个命令按钮控件。如下图。

1

第一种方法（简单、直接）

Private Sub Command1_Click()    '直接用StrReverse内部函数

     S1 = Text1.Text

     S2 = StrReverse(S1)

     Text2.Text = S2

End Sub

2

 第二种方法

Private Sub Command2_Click()    '综合应用内部函数Len， Mid，和for循环。

    Dim S1 As String   'S1存放原文本内容

    Dim S2 As String   'S2存放转换后的文本内容

    S1 = Text1.Text

    S2 = ''

   For I = 1 To Len(S1)

        S2 = S2 Mid(S1, Len(S1) - I 1, 1)

   Next I

    Text2.Text = S2

End Sub

---

两种方法比较，可知方法1不仅简单而且快速，在VB实际编程开发中正确运用内部函数非常重要哦。

程序运行后的界面：

---

---