vb復(fù)制粘貼代碼 vb怎么做復(fù)制粘貼 _生活百科

文章插圖
復(fù)制操作應(yīng)該是復(fù)制當(dāng)前選區(qū)而不是整個文本框內(nèi)容,粘貼應(yīng)該是將剪帖板內(nèi)容插入到當(dāng)前光標(biāo)所在位置,而不是將文本框原有內(nèi)容徹底覆蓋,另外,通常當(dāng)Text1沒選中文字時,要使復(fù)制按鈕Command1不可用
Private Sub Command1_Click()
Clipboard.SetText Text1.SelText
End Sub
Private Sub Command2_Click()
If Len(Clipboard.GetText) Then
Text1.SelText = Clipboard.GetText
End If
End Sub
Private Sub Form_Load()
Command1.Enabled = False
End Sub
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
Command1.Enabled = Text1.SelLength > 0
End Sub
Private Sub Text1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Butt Then
Command1.Enabled = Text1.SelLength > 0
End If
End Sub
比如Text1的內(nèi)容為abc，而當(dāng)前只選中了第一個字符a
那么Text1.text表示文本框的全部內(nèi)容，即abc
【vb復(fù)制粘貼代碼 vb怎么做復(fù)制粘貼】而Text1.SelText表示文本框中當(dāng)前選中的內(nèi)容，即a--selText是select text（選中文字）的縮寫

vb復(fù)制粘貼代碼 vb怎么做復(fù)制粘貼

推薦閱讀

如何找尋自我

縫紉機(jī)調(diào)線器怎么安裝平車方法如何

強(qiáng)組詞強(qiáng)字組詞

火筍雞翅的做法（增肥食譜）

閨女生日快樂祝福語朋友圈

LV請來潮牌設(shè)計師做藝術(shù)總監(jiān)，看中的是啥

老虎豆怎么做好吃老虎豆圖片怎樣弄來吃

暖氣有流水聲是什么原因

皮球是什么體

手機(jī)怎樣開通QQ空間

男生發(fā)mua說明 mua是什么意思

手指蓋凹陷怎么回事

對自己的生活失去掌控咋調(diào)整

小米10s怎么沒有月亮模式

我想找個偏僻的地方搞養(yǎng)殖！有沒有推薦的地方？

南京養(yǎng)老金認(rèn)證上門服務(wù)怎么申請南京市養(yǎng)老金認(rèn)證

如何評價豬場閹割豬？

最后一個字是豹的成語

泰山散酒怎么樣

貓發(fā)情的聲音(貓發(fā)情的叫聲)