Multiline dans textbox et fichier texte

Question

quelqu'un pourrait me dire pourquoi quand j affiche un fichier texte dans une textbox avec la propriete multiline en true il s affiche toujours a la 2e ligne et pas au debut de la textbox
et comment je pourrais regler ca?
j ai visual basic 6 SP5 et je lis dans mon texte et j affiche comme ceci
intfile = FreeFile(999)
    Open file For Input As #intfile
    Do While Not EOF(intfile)
      Line Input #intfile, myvar
      Form(varInt).Text1.Text = Form(varInt).Text1.Text & vbCrLf & myvar
    Loop
    Close #intfile

merci d'avance :o)

cs_Crazyht · Answer

A la premiere itération de ton code tu fait en fait :
Form(varInt).Text1.Text = "" & vbCrLf & myvar
si tu veux resoudre ca, fait :

intfile = FreeFile(999)
Open file For Input As #intfile
Do While Not EOF(intfile)
Line Input #intfile, myvar
if (Form(varInt).Text1.Text = "" ) then
  Form(varInt).Text1.Text = myvar
else
  Form(varInt).Text1.Text = Form(varInt).Text1.Text 
& vbCrLf & myvar
end if
Loop
Close #intfile


Bonne prog
A++
Hervé

cs_Sna · Answer

arf je suis trop bete, je viens de comprendre a quoi sert le vbCrLf j aurais pu le trouver seul qd meme lol
Un grand merci en tout cas :), ca marche super

A pluche
Sna

Multiline dans textbox et fichier texte

2 réponses

Discussions similaires