Bonjour,
l'ajout dans le fichier ne s'effectue pas.
Voici le code
Private Sub Enregistrer_Click(sender As Object, e As EventArgs) Handles Enregistrer.Click
Dim x As String
wr.Close()
fs = New System.IO.FileStream("c:\boutheina\aziz.txt", System.IO.FileMode.Append)
wr = New System.IO.StreamWriter(fs)
For i = 0 To ListBox1.Items.Count - 1
x = ListBox1.Items(i)
wr.WriteLine(x & ";")
Next
End Sub