Comment lire les 10 premières ligne en visual basic expres 2010

Bonjour jennyfer92,

Voilà, le code pour lire les dix premières lignes d'un fichier texte.
- ne pas oublier d'inclure l'imports au début du document,
- l'appel peut s'effectuer comme ceci : LireFichierLigneParLigne(Chemin, Fichier),
- ici, j'ai ajouté une TextBox que tu peux nommé "TextBox3",
- C'est la boucle "For i" qui gère le nombre de ligne que tu veux lire:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Imports System.IO

Private Sub LireFichierLigneParLigne(ByVal CheminFichier As String, ByVal NomFichier As String)
    TextBox3.Text = ""
    Dim i As Integer = 1
    Try
        Using sr As New StreamReader(CheminFichier & NomFichier)
            Dim LigneLue As String = ""
            For i = 1 To 10
                LigneLue = sr.ReadLine
                TextBox3.Text = TextBox3.Text & LigneLue & vbNewLine
            Next i
        End Using
    Catch e As Exception
        TextBox3.Text = TextBox3.Text & "Le fichier ne peut être lu :" & vbNewLine & e.Message
    End Try
End Sub

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

merci beaucoup, cela fonctionne effectivement