用VB实现文本框内文字复制，剪切，粘贴，求源代码，急需

复制到剪切板
Clipboard.Clear
Clipboard.SetText (text1)
粘贴
text2.text=Clipboard.getText (text1)
剪切
Clipboard.Clear
Clipboard.SetText (text1)
text1.text=“”本回答被网友采纳

复制到剪切板
Clipboard.Clear
Clipboard.SetText text1.seltext
粘贴
text1.seltext=Clipboard.getText ( vbcftext)
剪切
Clipboard.Clear
Clipboard.SetText text1.seltext
text1.seltext=""本回答被提问者采纳