DataGridView в файл CSV

У меня есть проект VB 2010 Express, в котором есть DataGridView, который я пытаюсь записать в файл CSV.

У меня есть все для записи за работой. Но это медленно. Медленно = может быть 30 секунд для 6000 строк по 8 столбцов.

Вот мой код:

    Private Sub btnExportData_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExportData.Click
    Dim StrExport As String = ""
    For Each C As DataGridViewColumn In DataGridView1.Columns
        StrExport &= """" & C.HeaderText & ""","
    Next
    StrExport = StrExport.Substring(0, StrExport.Length - 1)
    StrExport &= Environment.NewLine

    For Each R As DataGridViewRow In DataGridView1.Rows
        For Each C As DataGridViewCell In R.Cells
            If Not C.Value Is Nothing Then
                StrExport &= """" & C.Value.ToString & ""","
            Else
                StrExport &= """" & "" & ""","
            End If
        Next
        StrExport = StrExport.Substring(0, StrExport.Length - 1)
        StrExport &= Environment.NewLine
    Next

    Dim tw As IO.TextWriter = New IO.StreamWriter("C:\Test1.CSV")
    tw.Write(StrExport)
    tw.Close()
End Sub

Кто-нибудь знает, что я могу сделать, чтобы ускорить его?

спасибо

5
задан Joel Coehoorn 8 March 2012 в 18:08
поделиться