VB.NET Récupérer valeurs d'un fichier texte [Résolu/Fermé]

Signaler
-
 Utilisateur anonyme -
Bonjour,

Je voudrais savoir comment faire pour lire les lignes d'un fichier texte et les placer en tant qu'items dans un Combo Box.
Je m'explique :
Dans mon fichier j'ai ça :
ligne 1
ligne 2
ligne 3
ligne 4
...

Et je voudrais retrouver dans mon comboBox ça :
ligne 1
ligne 2
ligne 3
ligne 4
...

En gros il faut que je transforme une ligne en Item!

Merci d'avance pour vos réponses.

Bien à vous,

troopy28

1 réponse

Messages postés
7216
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
19 janvier 2021
601
Bonjour,

Tu mets ton fichier texte dans le dossier Debug avec l'exécutable.
Voici le code:

Imports System.IO
Public Class Form1
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        lectureFichier(Application.StartupPath & "\monfichier.txt")
        ComboBox1.SelectedIndex = 0
    End Sub
    Sub lectureFichier(ByVal fichier As String)
        Try
            ' Création d'une instance de StreamReader pour permettre la lecture de notre fichier
            Dim monStreamReader As StreamReader = New StreamReader(fichier)
            Dim ligne As String
            'Lecture de toutes les lignes et affichage de chacune sur la page
            Do
                ligne = monStreamReader.ReadLine()
                ComboBox1.Items.Add(ligne)
            Loop Until ligne Is Nothing
            'Fermeture du StreamReader (attention très important)
            monStreamReader.Close()
        Catch ex As Exception
        End Try
    End Sub
End Class


Bonne programmation


Utilisateur anonyme
C'est exactement ce que je cherchais! Merci beaucoup!