一个VB 的小问题

来源:百度知道 编辑:UC知道 时间:2024/07/02 03:45:39
我用textbox控件 输入 一个串文字` 以前要是想 复制这串文字 都得用鼠标 去选然后在复制` 我想在这串 文字的旁边 做个按妞 这个按妞的功能就是` 按一下 就复制 旁边textbox控件里的所有 文字``` 不知道能不能实现`` ` 小弟在线等` 能的话 请 赐教 一下 `` `谢谢拉`

复制到粘贴板:
Private Sub Command1_Click()

Clipboard.Clear
Clipboard.SetText Text1.Text, vbCFText

End Sub

用一个Api
SendMessage(text1.hwnd,WM_COPY,0,0)
发送一个拷贝消息

http://www.tianya.cn/new/publicforum/Content.asp?strItem=it&flag=1&idArticle=320095

Private Sub Command1_Click()
Text2.Text = Text1.Text
End Sub