Lire dans un RichTextBox ou un TextBox Multiligne

Question

Salut
         Je suis en train de programmer un programme et je voudrais savoir comment lire chaque ligne dans un RichTextBox .
        Sinon mettre à la boucle chaque ligne dans une variable string séparament .
                    Merci d'avance

N.B : Ne me moquez pas de moi si je vous dis que ce programme est un interpreteur d'un langage que j'ai inventé .

cs_yvesyves · Answer

Tu fais une recherche avec newpos = instr(1,RTb.text,vbcrlf)
Grace a ca tu peut reperer les sauts de lignes. 
Tu mémorise l'emplacement et comme ca tu récupere le texte entre les deux emplacements.
Text = mid(rtb.text, ancienpos & vbcrlf, newpos)
Attention, ton controle Rtb peut remettre à la ligne automatiquement et là ce n'est pas une nouvelle ligne, juste un resize donc le text serait sur une ligne.
Les nouvelles lignes se font de cette manière :
RTB.appendtext = "yyyy" & vbcrlf & "zzzz"
ou
RTB.appendtext = "yyyy" & vbnewline & "zzzz"

PCPT · Answer

salut,
appendtext en VB6? .....

cs_yvesyves · Answer

A peut être pas en Vb6 je me disais..

cs_yvesyves · Answer

Je me suis trompé sur cette ligne :(
c'est pas :
Text = mid(rtb.text, ancienpos & vbcrlf, newpos)
mais :
Text = mid(rtb.text, ancienpos & vbcrlf, newpos - ancienpos)
car le dernier argument concerne une longueur.
Après a toi de voir le code dans une boucle.

PCPT · Answer

ancienpos & vbcrlf ?
integer ou long + string?
y'a des jours sans....

cs_yvesyves · Answer

Oulà c'est pas mon jour, ancienpos + len(vbcrlf)

Lire dans un RichTextBox ou un TextBox Multiligne

6 réponses

Votre réponse

Discussions similaires