ex5.用中间变量交换文本 Option Explicit Private Sub Command1_Click() Dim strTmp As String strTmp = Text1.Text Text1.Text = Text2.Text Text2.Text = strTmp End Sub 该例通过数据类型为字符型(