首先，我們需要在窗體上添加兩個文本框控件和兩個命令按鈕控件。如下圖。

Private Sub Command1_Click()    '直接用StrReverse內部函數(shù)

     S1 = Text1.Text

     S2 = StrReverse(S1)

     Text2.Text = S2

End Sub

 第二種方法

Private Sub Command2_Click()    '綜合應用內部函數(shù)Len， Mid，和for循環(huán)。

    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實際編程開發(fā)中正確運用內部函數(shù)非常重要哦。

程序運行后的界面：