VB中TEXT文本怎么设定为单击复制

2024-11-17 11:46:02

推荐回答（3个）

回答1：

你可以用ClipBoard的SetText属性来复制到剪切板在窗体中放上一个文本框，打开代码窗口，把下面代码复制到里面：
Private Sub Text1_Click()
Clipboard.Clear
Clipboard.SetText Text1.Text
MsgBox "文字已复制到剪切板"
End Sub

回答2：

Private Sub Text1_Click()
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
Clipboard.SetText Text1.SelText
End Sub

回答3：

text1.click中 clipboard.clearclipboard.settext text1.text

最新问答

求一个按键精灵后台抓图脚本

家里出现一种黄黑相间的虫，多足，踩死后有臭味，这事什么虫？？

想买个最好用的手机，一千元左右的，大家推荐一个？

动漫刀剑神域一共多少级有人说是24级有的说是25级到底是几级？？？？

一首拉丁风格舞曲是男女对唱的中间是哦类啊类啊类啊类啊类啊类之类的节奏很欢快的