'Efface le clipboard Clipboard.Clear 'Copie du texte Clipboard.SetText "Salut" 'Colle du texte Text1.Text = Clipboard.GetText Clipboard.Clear 'Copie une image Clipboard.SetData LoadPicture("c:\MonImage.bmp") 'Colle l'image si c'est bien une imageIf Clipboard.GetFormat vbCFBitmap Then Picture1.Picture Clipboard.GetData