在VB.NET中从ListView导出CSV

Dim csvPath As String = "C:\Path\To\Save\CSV\file.csv"

Dim csvContent As New StringBuilder()

For Each row As ListViewItem In listView1.Items
    For Each cell As ListViewItem.ListViewSubItem In row.SubItems
        csvContent.Append(cell.Text)
        csvContent.Append(",")
    Next
    csvContent.AppendLine()
Next

Using stream As New FileStream(csvPath, FileMode.Create, FileAccess.Write)
    Using writer As New StreamWriter(stream, Encoding.UTF8)
        writer.Write(csvContent.ToString())
    End Using
End Using

MessageBox.Show("CSV file exported successfully!", "Export Complete", MessageBoxButtons.OK, MessageBoxIcon.Information)