VB.NET只读一些细胞从CSV文件中的每一行

Question

我有一个具有以下结构的CSV文件：

id,name,adress,email,age 
1,john,1 str xxxx,john@gmail.com,19 
2,mike,2 bd xxxx,mike@gmail.com,21 
3,jeana,1 str ssss,jeana@gmail.com,18 
....................... 
....................... 

我想什么做的是读取csv文件，跳过第一行（包含头文件）并从每行中提取第2,3和4个数据并填充datagridview。

这是我使用的代码，但是它带给我所有的CSV内容：

DataGridView1.ColumnCount = 4 
DataGridView1.Columns(0).Name = "ID" 
DataGridView1.Columns(1).Name = "NAME" 
DataGridView1.Columns(2).Name = "ADRESS" 
DataGridView1.Columns(3).Name = "AGE" 
Using MyReader As New Microsoft.VisualBasic.FileIO.TextFieldParser _ 
      (openFile.FileName)//the csv path 

       'Specify that reading from a comma-delimited file' 
       MyReader.TextFieldType = FileIO.FieldType.Delimited 
       MyReader.SetDelimiters(",") 
       Dim currentRow As String() 
       While Not MyReader.EndOfData 
        Try 
      currentRow = MyReader.ReadFields() 
      With DataGridView1.Rows.Add(currentRow) 'Add new row to data gridview' 
         End With 
        Catch ex As Microsoft.VisualBasic.FileIO.MalformedLineException 
         MsgBox("Line " & ex.Message & "is not valid and will be skipped.") 
        End Try 
       End While 
      End Using 

所以有人可以告诉我该怎么做？ 谢谢。

Answer 1

这可能是简单的阅读的第一行，并丢弃它，然后开始从文件

Using MyReader As New TextFieldParser(openFile.FileName) 
    MyReader.TextFieldType = FileIO.FieldType.Delimited 
    MyReader.SetDelimiters(",") 
    Dim currentRow As String() 
    ' Read the first line and do nothing with it 
    If Not MyReader.EndOfData Then 
     currentRow = MyReader.ReadFields() 
    End If 
    While Not MyReader.EndOfData 
     Try 
      ' Read again the file 
      currentRow = MyReader.ReadFields() 
      DataGridView1.Rows.Add(currentRow(1), currentRow(2),currentRow(3)) 
     Catch ex As Microsoft.VisualBasic.FileIO.MalformedLineException 
      MsgBox("Line " & ex.Message & "is not valid and will be skipped.") 
     End Try 
    End While 
End Using 

编辑读取的真实数据眼看下面那么你的意见我已经改变了添加行行仅添加位置1,2和3处的字符串。这当然与添加到DataGridView的列不同。目前尚不清楚您是否要将这些列更改为仅包含这3个字段。如果你仍然想在网格ID列和AGE你可以改变添加到

DataGridView1.Rows.Add("", currentRow(1), currentRow(2),currentRow(3), "")