"enregistrer sous" a partir d'une listview vers un fichier csv ou text

bonjour j'ai fait un menu dans lequel j'ai écrit "enregistrer sous" je voudrais que lorsque je clique sur celui ci une boite de dialogue s'ouvre et j'enregistre ma listview dans un fichier CSV , mais voila ça ne marche pas car je ne sais pas comment transférer les cellules d'un listview vers un fichier

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
  Private chemin_fichier As String = ""
    Dim SFD1 As New SaveFileDialog()
 
 
 
    Private Sub SaveText()
        Dim reponse As DialogResult
        SFD1.FileName = "*.*"
        SFD1.Filter = "Fichiers Text (*.txt)|*.txt|Fichier HTML (*.html)|*.html|Fichier HTM (*.htm)|*.htm|Fichiers CSV (*.CSV)|*.CSV"
        reponse = SFD1.ShowDialog()
        Try
            If reponse = DialogResult.Cancel Then
                '   Else : File.WriteAllText(SFD1.FileName, TextBox1.Text, System.Text.Encoding.Default)
 
            Else : File.WriteAllText(SFD1.FileName, ListView1.Items.ToString, System.Text.Encoding.Default)
                                          'mon probleme est la listview.items.tostring ??
                ' File.WriteAllLines(SFD1.FileName, TextBox1.Text, System.Text.Encoding.Default)
 
 
                chemin_fichier = SFD1.FileName
 
 
            End If
 
        End Try
    End Sub
 
 Private Sub EnregistrerSousToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EnregistrerSousToolStripMenuItem.Click
        SaveText()
    End Sub