Afficher un fichier texte ligne par ligne dans une textbox

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

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.