Titre: Le presse-papier.
Description:
Exemple de copie dans le presse-papier et de récupération des données du presse-papier.
Le code:
Private Sub Command1_Click() Dim Retour Clipboard.Clear Clipboard.SetText Text1.Text Text1.Text = "" Retour = MsgBox(Clipboard.GetText, 64, "Contenu du presse-papier") End Sub Private Sub Command2_Click() Label1 = Clipboard.GetText End Sub |