仅从 csv 读取某些列

Question

所以我有一个包含额外逗号的 csv 文件。我知道在特定专栏之后我将不再需要任何东西。所以基本上我不需要第 12 列之后的任何信息。我对 csv 到达我时的外观没有发言权，所以我不能在那里更改它。我想知道是否有办法只读取前 12 列而忽略 csv 文件的其余部分。

这就是代码现在的样子。

感谢您的帮助

Private Sub GetData(ByVal Path As String, ByRef DG As DataGridView, Optional ByVal NoHeader As Boolean = False)
    Dim Fields(100) As String
    Dim Start As Integer = 1
    If NoHeader Then Start = 0
    If Not File.Exists(Path) Then
        Return
    End If
    Dim Lines() As String = File.ReadAllLines(Path)
    Lines(0) = Lines(0).Replace(Chr(34), "")
    Fields = Lines(0).Split(",")
    If NoHeader Then
        For I = 1 To Fields.Count - 1
            Fields(I) = Str(I)
        Next
    End If

    dt = New DataTable()

    For Each Header As String In Fields
        dt.Columns.Add(New DataColumn(Header.Trim()))
        Dim desiredSize As Integer = 11

        While dt.Columns.Count > desiredSize
            dt.Columns.RemoveAt(desiredSize)
        End While

    Next
    For I = Start To Lines.Count - 1
        Lines(I) = Lines(I).Replace(Chr(34), "")
        Fields = Lines(I).Split(",")

        Dim dr As DataRow = dt.Rows.Add()
        For j = 0 To Fields.Count - 1
            dr(j) = Fields(j).Trim()
        Next

    Next

    DG.DataSource = dt
End Sub

Answer 1

您真正需要做的就是，在循环底部的Fields 的for 循环中，将For j = 0 to Fields.Count - 1 替换为For j = 0 to 11。