Discussion :

[STG]

Admettons que j'ai une boucle pour récuperer certaines valeurs.
Comment faire pour ecrire ces valeurs dans un richtextbox (en passant à une nouvelle ligne pour chaque valeur et en changant de couleur de texte)

:

par avance merci

[ThierryAIM]

Ton RTBox est vide ou il contient déjà qque chose :

[KIKI_94]

salut

Tu peux faire directement tout ça dans le richtextbox !
Considère le contenu comme une string et tu peux travailler avec.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
If InStr(1, txtASP.Text, txtSearchWord(ii).Text) > 0 Then
                    txtASP.Text = Replace(txtASP.Text, txtSearchWord(ii).Text, txtReplaceWord(ii).Text)
                End If

A savoir qu'ici j'utilise un textbox pour un richtext box chaque ligne est considérée comme un élément du contrôle.
Rie, ne t'empêche de rechercher le texte voulu de le sélectionner et de changer sa font et sa couleur.

@+

[STG]

Mon richtextbox n'est pas vide au début

[STG]

Si je fais (par exemple)

for i=0 to 10
Richtextbox1.text=Richtextbox1.text & vbcrlf & i
next i

cela fonctionne (j'ai bien toutes les valeurs sur des lignes différentes)
le problème est que je ne peux pas donner une couleur différente pour chaque ligne)

L'idée est peut-être d'aller chercher la fin du texte, d'y placer le point d'insertion, faire un retour à la ligne, de sélectionner la couleur voulue puis d'écrire le texte.

Mais comment coder cela : : :

[SpaceFrog]

selstart vous connaissez ???
mybox.selstart = len(mybox.text) et cela positionne le curseur à la fin,

ce sujet a d'ailleurs déja été traité, il vous suffira de faire une recherche avec richtexbox et ligne si ma mémoire est bonne ...

[STG]

OK pour le selstart spacefrog

mais aprés si je fais Richtextbox.text= Mastring

cela me remplace tout ce qui avait déjà été écrit

[bidou]

Richtextbox.Seltext= Mastring

[ThierryAIM]

J'y vais aussi de mon couplet :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Richtextbox.SelColor= &H8000&
Richtextbox.Seltext = Mastring

rajoute le texte en VERT