Afficher un fichier texte ligne par ligne dans une textbox

Soyez le premier à donner votre avis sur cette source.

Snippet vu 9 713 fois - Téléchargée 47 fois

Contenu du snippet

Ce code n'est pas de moi il est de Death Angel, avec juste des ptites modfis
fo zuste un boutton et un textbox

Source / Exemple :


Dim LFile As Long 'Lecture
Dim OFile As String 'Fichier à ouvrir
Dim Ligne As String 'Ligne
OFile = "C:\lalal.txt"
LFile = FreeFile
Open OFile For Input As #LFile
Do 'début de boucle
Input #LFile, Ligne
Text1.Text = Text1.Text & vbNewLine & Ligne
Loop Until EOF(LFile)

A voir également

Ajouter un commentaire

Commentaires

DraaFil
Messages postés
264
Date d'inscription
mercredi 16 avril 2003
Statut
Membre
Dernière intervention
23 mars 2012
-
touver mon erreur merci pareil
DraaFil
Messages postés
264
Date d'inscription
mercredi 16 avril 2003
Statut
Membre
Dernière intervention
23 mars 2012
-
j'ai essayer ton code mais cela me donne de caractere entre chaque ligne mais toute est sur un ligne. Pourtant dans le fichier les valeur son sur des ligne differente.

Merci
ouais:
close OFile

...

pi en plus c djs sur le site
:(
t'as oublié le close....

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.