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

Soyez le premier à donner votre avis sur cette source.

Snippet vu 84 277 fois - Téléchargée 111 fois


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

Ajouter un commentaire

Commentaires

Ca marche pas!
il manque le contenu du fichier
Text1=Text1+ a$+Chr$(13)+Chr$(10)
obelix3200
Messages postés
8
Date d'inscription
samedi 5 octobre 2002
Statut
Membre
Dernière intervention
2 novembre 2002
-
marche toujours po... :(
inuyasha51
Messages postés
8
Date d'inscription
jeudi 27 février 2003
Statut
Membre
Dernière intervention
22 août 2005
-
C'est tout cucul comme astuce (je veux dire simple) mais CA MARCHE PAS. Si les gens laissent des codes très simples pour aider les debutants, merci au moins de laisser des codes qui marchent. Sinon, c'est pas la peine. Merci pour l'effort quand même. Je vais chercher ailleurs.
dionysos6868
Messages postés
310
Date d'inscription
jeudi 4 septembre 2003
Statut
Membre
Dernière intervention
9 juin 2005
-
ca marche tres bien

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.