Question

怎么在VB里添加代码按妞实现复制文字

就是一按那个框框会提示已成功复制提示框~还有成功复制的内容怎么添加进去~求源代码
谢谢1楼的~那怎么实现粘贴呢~提示复制成功可无法粘贴撒~

Answer 1

Private Sub Command1_Click()
Clipboard.SetText Text1.Text
MsgBox "复制text1.text到剪切板成功"
End Sub

Answer 2

在Clipboard.SetText 之前要清除下剪贴板，要不然不能复制成功

Clipboard.Clear