编写程序建立一个包括两个Label控件

编写程序，建立一个包括两个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(原字符串,起始位置,长度)返回原字符串中从起始位置开始长度为长度的字符串