vb複制粘貼代碼?複制操作應該是複制當前選區而不是整個文本框内容,粘貼應該是将剪帖闆内容插入到當前光标所在位置,而不是将文本框原有内容徹底覆蓋,另外,通常當Text1沒選中文字時,要使複制按鈕Command1不可用，下面我們就來說一說關于vb複制粘貼代碼?我們一起去了解并探讨一下這個問題吧!
vb複制粘貼代碼
複制操作應該是複制當前選區而不是整個文本框内容,粘貼應該是将剪帖闆内容插入到當前光标所在位置,而不是将文本框原有内容徹底覆蓋,另外,通常當Text1沒選中文字時,要使複制按鈕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的内容為abc，而當前隻選中了第一個字符a
那麼Text1.text表示文本框的全部内容，即abc
而Text1.SelText表示文本框中當前選中的内容，即a--selText是select text（選中文字）的縮寫
zpostcode 
Recruit 
weather 
mreligion 
Yellowpages 
sport 
constellation 
shopping 
name 
game 
directory 
literature 
Word 
tour 
furnish 
Lottery 
tftnews 
lyrics 
News 
digital 
car 
dir 
Edu 
Finance 
