Private Sub Command1_Click()
'Mengosongkan Clipboard
Clipboard.Clear
'Menentukan Clipboard
Clipboard.SetText Text1.Text
End Sub
Private Sub Command2_Click()
'Mengambil Data Teks dari Clipboard
Text1.Text = Clipboard.GetText
End Sub
Copy Paste Clipboard
'Menggunakan Copy Paste dengan Clipboard di VB6
Subscribe to:
Post Comments (Atom)

0 comments:
Post a Comment