Salut atalayk
Si tu veux simplement remplacer un texte par un autre, il te suffit de faire :
RTB.Text = Replace(RTB.Text, "Ancien texte", "Nouveau texte")
Si maintenant tu dois, comme sous Notepad, proposer à l'utilisateur le choix de remplacer ou non les occurences successives de la recherche, il va falloir faire de la prog :
- Créer une fenêtre de présentation style Notepad "Find and replace"
- Avec le bouton "Suivant", faire une rechercher du texte dans le RTB, le sélectionner pour l'afficher en utilisant la méthode RTB.Find
- Avec le bouton "Remplacer", faire le remplacement :
RTB.Text = Left(RTB.Text, RTB.SelStart) & NouveauTexte & Mid(RTB.Text, RTB.SelStart + Len(AncienTexte))
, puis lancer une nouvelle recherche ...
...
Il faut tout te faire à la main : projet sympa !
Vala
Jack
|