AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

  • Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2009 07 06 16:01:09
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

COUPER, COPIER, COLLER DANS UNE RICHTEXTBOX


Information sur la source

Catégorie :Texte Classé sous : couper, copier, coller, texte, richtextbox Niveau : Initié Date de création : 24/03/2000 Vu : 7 868
Auteur : JCLK Ecrire un message privé
Note :
6,8 / 10 - par 5 personnes
6,80 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Commentaire sur cette source (6)
Ajouter un commentaire et/ou une note

Description

Soit une feuille (form1) qui contient trois boutons (couper, copier, coller) et une TextBox ou une RichTextBox (text1) dont les propriétés "Multiline" et "Scrollbars" ont respectivement pour valeur "True" et "Vertical".
 

Source

  • ' on affecte les codes suivants aux boutons :
  • Private Sub couper_Click()
  • If Text1.SelText <> "" Then
  • Clipboard.SetText(Text1.SelText)
  • Text1.SelText = ""
  • End If
  • End Sub
  • Private Sub copier_Click()
  • If Text1.SelText <> "" Then
  • Clipboard.SetText(Text1.SelText)
  • End If
  • End Sub
  • Private Sub Coller_Click()
  • Text1.SelText = Clipboard.GetText
  • End sub 
' on affecte les codes suivants aux boutons :

Private Sub couper_Click()
    If Text1.SelText <> "" Then
        Clipboard.SetText(Text1.SelText)
        Text1.SelText = ""
    End If
End Sub

Private Sub copier_Click()
    If Text1.SelText <> "" Then
        Clipboard.SetText(Text1.SelText)
    End If
End Sub

Private Sub Coller_Click()
    Text1.SelText = Clipboard.GetText
End sub

Conclusion

Ensuite on peut sélectionner du texte dans form1.text1 et le couper, le copier ou le coller à l'aide des trois boutons.
Voir aussi "Couper, Copier, coller dans une TextBox".




 

Commentaires et avis

signaler à un administrateur
Commentaire de Fimagen le 08/02/2002 14:03:39

il doit y avoir une erreur dans ton code :

dans mon appli, quand je fait un couper/coller ou un copier/coller, il colle deux fois.

Exemple :
Bonjour *la je selectionne le mot, je fait un copier/coller ou un couper/coller*

*j'obtiens :*

BonjourBonjour "ca le fait en double"

reponds moi si tu as la solution ou si c un truc chez moi qui déconne

signaler à un administrateur
Commentaire de skaferadics le 02/04/2002 22:38:45

be au debut de ton appli tu a cas vider le presse papier
apres si tu fait un copier coller tu devrai plus avoir d'erreur qui double tes mots
a+
skafer

signaler à un administrateur
Commentaire de skaferadics le 02/04/2002 22:39:16

be au debut de ton appli tu a cas vider le presse papier
apres si tu fait un copier coller tu devrai plus avoir d'erreur qui double tes mots
a+
skafer

signaler à un administrateur
Commentaire de ldx le 22/02/2005 13:43:46

Bonjour

Un clipboard.clear en deébut de prog est insuffisant.

Le "Coller" sur un SelText double bien. Je suppose qu'implicitement le contenu du presse-papier est mis à disposition de la RichTextBox (au point d'insertion).
Si vous vous amusez à calculer le LENGTH  d'une richtextbox vide avant un copier ou couper, celui-ci sera égal à zéro. Copiez du texte dans un doc. extérieur à votre prog...  si votre RichTextBox est "actif" et que vous revérifiez sa longueur avant le coller, vous vous apercevrez que celle-ci est égale au contenu du presse-papier. En un mot tout se passe comme si le contenu du presse-papier avait été inséré de manière invisible ...

Solution ? je ne l'ai pas encore trouvée. Je suis actuellement dessus ...

signaler à un administrateur
Commentaire de EdBsb le 26/04/2006 23:15:53

Source simple et claire !!
Plutôt pour débutant qu'initié peut être !
Je note 10 car même 4 ans après, elle sert toujours !!!
Ed

signaler à un administrateur
Commentaire de marquise04 le 19/03/2007 23:16:25

merci bp
tres simple et claire

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

Annuler couper/copier/coller dans une Richtextbox [ par mJuJu ] Salut à tous.Voilà. Je travaille en VB6. J'utilise le menu contextuel dans des richtextbox (AutoVerbMenu = true). En ce qui concerne le couper, copier Copier/coller texte d'une cellule vers un objet??? [ par sunshine78 ] Bonjour à tous,Voila je suis un peut perdue au niveau des macro Excel. J'attend une formation avec impatience mais en attendant je dois me débrouiller Sélectionner/Copier plusieurs images d’un RichTextBox et Coller sur un n’autre RichTextBox ou Panel [ par naim1970 ] Bonjour,   <p class="MsoNormal" st copier coller [ par Rogan Thoerson ] Bonjour C'est la première fois que je poste alors s'il vous plait essayer d'être indulgents. (en plus j'ai commencé le visual basic cette semaine)Ques couper coller un code [ par zeitounZ ] Bonjour,Quelle est l'astuce pour copier-coller un code trouvé dans ce site dans notepad ou autre éditeur ? Par xemple ce code : http://www.vbfrance.co code bouton Copier Coller Couper d'un texte dans une textebox dont une form vb.net2008 [ par chidori20 ] slt si klk un sait le code du bouton Copier bouton Coller bouton Couper que je vx les mettre dans une form vb.net avec une text box c ' urgent et M Couper, Copier, Coller ????? [ par Brodeur ] Bonjour, je me demandais en passant , mais comment qu'on fait pour faire un copier coller. Ainsi, je voudrais selectionner une partie de mon texte, a Copier-Coller-Couper [ par DEL ] ========================================je voudrai savoir comment faire dans un textbox pour permettre de faire copier, couper, coller avec les raccou Couper, Copier, Coller [ par Unrealll ] J'aimerais offrire la possibilité de faire des couper, copier et coller dans mon application (MDI). J'ai trouvé un bout de code fonctionnel pour un pe


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version


iPod touch 2ème génération (8 Go)
Entre 210€ et 229€


Visiter le guide achat

Photothèque Nouveau !

Photo pretty girlsPhoto Cockpit Airbus A320
Photo jeune fille plagePhoto Night Scene, Dubai, united arab emirates

Visiter la photothèque


Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,655 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.