主题：求助大大

Textbox2 leave 事件

vars("SelectedText") = e.form.Controls("TextBox2").SelectionStart

按钮1 Click 事件

Dim t2 As WinForm.TextBox = e.Form.Controls("TextBox2")

Dim t1 As WinForm.TextBox = e.Form.Controls("TextBox1")

t2.Text = t2.Text.Insert(vars("SelectedText"),t1.Text)