J'utilise une TextBox pour afficher un fichier text...
par la métode :
____________________________________________________________
If Fichier_a_Lire <> "" Then
Dim a As Long
a = FreeFile()
Open Fichier_a_Lire For Input As #1
Affiche_Fichier.Text = Input(LOF(1), 1)
Close #1
____________________________________________________________
Mais voilà, je viens de m'apercevoir que mon texte n'était pas tout là ! ! !
La taille du texte qui n'est pas tout affiché est de 68k octets 8dixit l'explorateur)
Je précise que j'ai doté ma TextBox d'un scrool vertical qui me permet d'aller jusqu'au bout de l'affichage...