VB.NET Récupérer valeurs d'un fichier texte

Résolu/Fermé
Utilisateur anonyme - 8 août 2014 à 13:10
 Utilisateur anonyme - 28 mars 2015 à 15:02
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

cs_Le Pivert Messages postés 7822 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 16 septembre 2022 716
8 août 2014 à 18:14
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


0
Utilisateur anonyme
28 mars 2015 à 15:02
C'est exactement ce que je cherchais! Merci beaucoup!
0