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)
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.