Lire un fichier texte ligne par ligne et le mettre dans un texte box


Contenu du snippet

Comment lire un Fichier Texte ligne par ligne et le mettre dans un TextBox ?

Créez un Formulaire avec un TextBox appelé Text1 et un Bouton.
Puis sur le Bouton_Click, mettez ce code :

Source / Exemple :


Text1.MultiLine=1
Open "fichier" For Input As #1
While Not EOF(1)
  Input #1,a$
  Text1=Text1+Chr$(13)+Chr$(10)
Wend
Close #1

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.