OVH Cloud OVH Cloud

peupler listbox avec fichier txt

3 réponses
Avatar
Pascal
bonjour
J'arrive à le faire (à partir d'un fichier texte contenant un mot par ligne)
mais à la fin j'ai un message box d'erreur m'indiquant : "la valeur ne peut
pas être null. nom du paramètre item."
quelqu'un a-t-il une idée, j'ai essayé le test nothing en début ou fin de
loop mais ça ne change rien?
voici le code :
With OpenFileDialog1
If .ShowDialog = Windows.Forms.DialogResult.OK Then
Try
Dim fileReader As System.IO.StreamReader
fileReader = My.Computer.FileSystem.OpenTextFileReader(.FileName,
System.Text.Encoding.Default)
Dim stringReader As String = ""
lstInputWord.Items.Clear()
Do 'While Not stringReader Is Nothing
stringReader = fileReader.ReadLine()
lstInputWord.Items.Add(stringReader)
Loop Until stringReader Is Nothing
fileReader.Close()

quel serait le code à utiliser pour sauvegarder la liste modifié du listbox
dans ce même fichier texte? quand j'essaie il me dit que le processus est
déjà en cours d'utilisation.

merci

3 réponses

Avatar
Christian
slt
essaie

While Not fileReader.EndOfFile
stringReader = fileReader.ReadLine()
lstInputWord.Items.Add(stringReader)
end while
fileReader.Close()
--
http://www.correzeweb.com
http://www.localetv.com
http://cerbermail.com/?5RVJmRhSQw
Avatar
mdes
Ton fichier contient probablement une ligne vide à la fin.

Remplace :
lstInputWord.Items.Add(stringReader)
par :
If stringReader.Length <> 0 Then lstInputWord.Items.Add(stringReader)
_________________________
"Pascal" a écrit :

bonjour
J'arrive à le faire (à partir d'un fichier texte contenant un mot par ligne)
mais à la fin j'ai un message box d'erreur m'indiquant : "la valeur ne peut
pas être null. nom du paramètre item."
quelqu'un a-t-il une idée, j'ai essayé le test nothing en début ou fin de
loop mais ça ne change rien?


Avatar
Pascal
bonjour
j'ai essayé avec :
While Not fileReader.EndOfStream

stringReader = fileReader.ReadLine()

lstInputWord.Items.Add(stringReader)

End While

fileReader.Close()

et maintenant ça marche

merci
http://www.scalpa.info