复制
ClipBoard.SetText(e.form.Controls("TextBox1").Text)
赋值
e.form.Controls("TextBox1").Text = ClipBoard.GetText