VB编程问题，急要~~

在窗体上画3个文本框，其名称分别为Text1,Text2,Text3,然后画2个单选按钮，名称分别为Op1,Op2，标题分别为“交换”，“连接”。要求运行时先单击“交换”按钮，使TEXT1和TEXT2文本框中的内容进行交换，并使“交换”单选按钮消失；然后单击“连接”单选按钮，则把交换后的Text1和Text2中的内容以Text1在前，Text2在后的顺序连接起来，并在TEXT3的文本框中显示连接后的内容。
注意：在结束程序运行前，必须先单击交换按钮，后单击连接按钮，退出程序时必须通过单击窗体右上角的关闭按钮。

Option Explicit

Private Sub Form_load()
Option1.Caption = "交换"
Option2.Caption = "连接"
Text2.Height = Text1.Height
End Sub

Private Sub Option1_Click()
Dim A As String
A = Text1.Text
Text1.Text = Text2.Text
Text2.Text = A
Option1.Visible = False
End Sub

Private Sub Option2_Click()
If Option1.Visible = True Then
Option2.Value = False
Exit Sub
End If
Text1.Top = 0
Text1.Left = 0
Text2.Top = 0
Text2.Left = Text1.Width
Text3.Text = Text1.Text + Text2.Text
End Sub

Private Sub Form_load()
Option1.Caption = "交换"
Option2.Caption = "连接"
Option2.Visible = False
Text1.Top = 0
Text2.Top = 480
Text1.Left = 0
Text2.Left = 0
End Sub

Private Sub Option1_Click()
Option1.Visible = False