VB 利用按钮全选并复制richtextbox中的内容,为什么一复制其他东西后就不能用了?

2025-03-02 00:50:26
推荐回答(1个)
回答1:

RichTextBox1.SelStart = 0
RichTextBox1.SelLength = Len(RichTextBox1)
SnedKeys "^{C}" '模拟按下Ctrl+C

或者
RichTextBox1.SelStart = 0
RichTextBox1.SelLength = Len(RichTextBox1)
Clipboard.Clear '先清空剪贴板
Clipboard.SetText Form4.RichTextBox1.SelText