0
我有一个将DataGridView导出为CSV的方法。但我有一个场景,我有一个DataSet像2-3表init。我想将它导出到一个单独的CSV文件中,每个DataSet表在一个单独的CSV表单中。如何将多个DataSet表导出到多个CSV表单?
这里是我的方法,其中一个DataGridView转换成CSV文件(注意我也会接受的C#代码,如果它可以使用在线工具转换为Vb)中:
Private Sub subExportDGVToCSV(ByVal strExportFileName As String, ByVal DataGridView As DataGridView, Optional ByVal blnWriteColumnHeaderNames As Boolean = False, Optional ByVal strDelimiterType As String = ",")
Dim sr As StreamWriter = File.CreateText(strExportFileName)
Dim strDelimiter As String = strDelimiterType
Dim intColumnCount As Integer = DataGridView.Columns.Count - 1
Dim strRowData As String = ""
If blnWriteColumnHeaderNames Then
For intX As Integer = 0 To intColumnCount
strRowData += Replace(DataGridView.Columns(intX).Name, strDelimiter, "") & IIf(intX < intColumnCount, strDelimiter, "")
Next intX
sr.WriteLine(strRowData)
End If
For intX As Integer = 0 To DataGridView.Rows.Count - 1
strRowData = ""
For intRowData As Integer = 0 To intColumnCount
strRowData += Replace(DataGridView.Rows(intX).Cells(intRowData).Value, strDelimiter, "") & IIf(intRowData < intColumnCount, strDelimiter, "") '''''''''highlights this row
Next intRowData
sr.WriteLine(strRowData)
Next intX
sr.Close()
End Sub