Question

求一VB程序,复制文本框中的内容

1、我在文本框中输入了文字，在面板上有一个“复制”按钮，点击后就能把文本框中的文字复制到剪贴板中，之后我就能粘贴到我想放的地方
2、也就是怎么能把文本中的文字取出来

Answer 1

Private Sub Command1_Click()
Clipboard.SetText Text1
MsgBox "已复制！"
Text2 = Clipboard.GetText
MsgBox "已粘贴"
End Sub
在Text1中输入字符，点击按钮就产生复制和粘贴事件（Text2=Text1）。

Answer 2

Private Sub Command1_Click()
Clipboard.SetText Text1.Text
End Sub

Answer 3

双击复制按钮，写入以下代码

假如你的文本框名字叫 Text1

clipboard.clear
clipboard.settext text1.text