Charger les items d'un listbox depuis un fichier.

Résolu
Anonyme209 Messages postés 681 Date d'inscription   Statut Membre Dernière intervention   -  
sipherion Messages postés 1809 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

je cherche le moyen de charger les items d'un listbox depuis un fichier.
J'ai essaye cela: (en important systeme.io)(le code se trouve a l'interieur d'un timer) 
Dim read as New StreamReader("fichier")
ListBox1.text = read.ReadToEnd  
read.Close
Mais rien ne se passe.
J'ai aussi essaye ca: (toujours en important systeme.io)(le code se trouve encore a l'interieur d'un timer) 
Dim read As New StreamReader("fichier")
line = read.ReadLine
If read.ReadToEnd <> ListBox1.Items.ToString Then
     If line <> "" Then
          ListBox1.Items.Add(line)
      Else
          ListBox1.Items.Clear()
      End If
Else
          ListBox1.Items.Clear()
End If
read.Close()
Mais cela charge les fichiers en double, sans arret.
Comment faire pour règler le problème?
A voir également:

3 réponses

Réponse 1 / 3
sipherion Messages postés 1809 Date d'inscription   Statut Membre Dernière intervention   286
 
Salut,

Est ce que mon message de ce sujet pourrait t'aider ?

https://forums.commentcamarche.net/forum/affich-29011767-menu-deroulant
0
Réponse 2 / 3
Anonyme209 Messages postés 681 Date d'inscription   Statut Membre Dernière intervention   16
 
Bonjour,

Merci pour ta réponse, mais j'ai réussi à contourner le problème:

J'ai mis ce code dans un sub simple, et non un timer. Ce sub est activé au démarrage de l'application, et à chaque fois que l'on clique sur le bouton actualiser: 

ListBox1.Items.Clear()

Dim read As New StreamReader("FICHIER")

line = read.ReadLine

While line <> 

    ListBox1.Items.Add(line)

    line = read.ReadLine

    End While

read.Close()

Cdt,

Anonyme209
0
Réponse 3 / 3
sipherion Messages postés 1809 Date d'inscription   Statut Membre Dernière intervention   286
 
Très bien, tant mieux si ton problème est réglé. Merci de passer la question comme résolue ;-)
0