Bonjour aux forums

Tres simplement je lis dans un fichier et les informations récupérées, je voudrais pouvoir les insérer dans un textbox, j'ai donc créer cette fonction :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
        LectureFichierTexte("C:\fichier_log\log.txt")
 
    End Sub 
 
 Private Sub LectureFichierTexte(ByVal path As String)
        Try
 
            Dim sr As StreamReader = File.OpenText(path)
 
            Do While sr.Peek() >= 0
                TextBox1.Text = sr.ReadLine()
 
            Loop
            sr.Close()
 
        Catch e As Exception
            Console.WriteLine("The process failed: {0}", e.ToString())
        End Try
    End Sub
Et le probleme c'est qu'il n'insere rien du tout dans le textbox.

Comment faire ?
Il n'y a pas d'autre objet pour insérer des données et que l'on puisse modifier la saisie a l'écran ?

Cordialement.