Copier,Couper,Coller

Messages postés
31
Date d'inscription
samedi 19 octobre 2002
Statut
Membre
Dernière intervention
10 mars 2009
-
Messages postés
31
Date d'inscription
samedi 19 octobre 2002
Statut
Membre
Dernière intervention
10 mars 2009
-
Voila j'aimerais tt simplement savoir les codes pour :Copier Coller Couper je debute et je ne les sais pas core merci de me répondre :)

4 réponses

Messages postés
116
Date d'inscription
lundi 16 septembre 2002
Statut
Membre
Dernière intervention
23 mai 2004

pour copier-coller :
FileCopy("chemin1", "chemin2")

pour couper-coller :
FileCopy("chemin1", "chemin2")
Kill "chemin1"

Et voilà, bonne prog
@+ tex
Messages postés
31
Date d'inscription
samedi 19 octobre 2002
Statut
Membre
Dernière intervention
10 mars 2009

Dsl mais j aurais du te préciser c'est du texte que je veux copier ex :
Copier texte du text box1
Couper "" "" "" ""
Coller "" "" "" ""
Merci de me répondre :)
Messages postés
1858
Date d'inscription
samedi 29 juin 2002
Statut
Membre
Dernière intervention
17 octobre 2013
10
Private Sub EditCut_Click ()
' Efface le contenu du Presse-papiers.
Clipboard.Clear
' Copie le texte sélectionné dans le Presse-
' papiers.
ClipBoard.SetText Screen.ActiveControl.SelText
' Supprime le texte sélectionné.
Screen.ActiveControl.SelText = ""
End Sub

Private Sub EditCopy_Click ()
' Efface le contenu du Presse-papiers.
Clipboard.Clear
' Copie le texte sélectionné dans le Presse-
' papiers.
ClipBoard.SetText Screen.ActiveControl.SelText
End Sub

Private Sub EditPaste_Click ()
' Place le texte du Presse-papiers dans le contrôle
' actif.
Screen.ActiveControl.SelText = ClipBoard.GetText ()
End Sub

Private Sub EditDelete_Click ()
' Supprime le texte sélectionné.
Screen.ActiveControl.SelText = ""
End Sub

Signé MSDN
Messages postés
31
Date d'inscription
samedi 19 octobre 2002
Statut
Membre
Dernière intervention
10 mars 2009

Merci merci mec c'est sympa
Tu parles de MSDN mais moi VB je l ai télécharger alors j'ai pas l'air :/ j'ai un copain qui a le cd je lui demanderai! tt cas merci