編寫程序，建立一個包括兩個Label控件，兩個Textbox控件和兩個CommandButbox控件的窗體。

熱心網友

逆序 Dim lngLenght As Long Dim lngIndex As Long lngLenght = Len(Text1.Text) Text2.Text = "" For lngIndex = 0 To lngLenght - 1 Text2.Text = Text2.Text & Mid(Text1.Text, lngLenght - lngIndex, 1) Next大寫 Text2.Text = UCase(Text1.Text)

熱心網友

Mid(原字符串,起始位置,長度)返回原字符串中從起始位置開始長度為長度的字符串