2013-09-05 4 views
-1

CSV 파일에서 데이터를 읽는 중입니다. 그러나 지금까지 선택한 열만 가져 오는 것이 목표 였지만 지금까지는 머리글 만 가져 오도록 루프 할 수만 있습니다. 누군가 행을 얻을 때까지 루프를 도와 줄 수 있습니까?.CSV 파일에서 행 데이터를 가져 오는 방법

수입 System.IO 공공 Form1 클래스

Private Sub btn_import_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_import.Click 
    Call csvmanagement() 

End Sub 
Structure systemstructure 

    Dim cGroupName As String 
    Dim cTransactDate As String 
    Dim cRow_ID As String 
    Dim cFullName As String 
End Structure 


Public Sub csvmanagement() 

    Dim systemspecs As New systemstructure 
    'Dim raw, column As Integer 
    Using csvparser As New FileIO.TextFieldParser _ 
    ("C:\Users\Eranji\Downloads\new.csv") 

     Dim csvalue As String() 

     csvparser.TextFieldType = Microsoft.VisualBasic.FileIO.FieldType.Delimited 
     csvparser.Delimiters = New String() {","} 

     csvalue = csvparser.ReadFields() 

     systemspecs.cGroupName = csvalue(0) 
     systemspecs.cTransactDate = csvalue(1) 
     systemspecs.cRow_ID = csvalue(2) 
     systemspecs.cFullName = csvalue(2) 

     While Not csvparser.EndOfData 

     End While 
     csvalue = csvparser.ReadFields() 

     End 

     ListBox1.Items.Add(systemspecs.cFullName & Chr(9) & systemspecs.cGroupName & Chr(9) & systemspecs.cRow_ID & systemspecs.cTransactDate) 
    End Using 

End Sub 

최종 클래스

답변

4

당신 만 readFields의
readFields의 당신은

While Not MyReader.EndOfData 
    csvalue = csvparser.ReadFields() 
    ... 
End 

을 종료 루프에 필요 한 줄
되면 TextFieldParser.ReadFields

+0

Hello Blam 저는 열과 행을 모두 가져와야합니다 ... 충분할 것입니다 .. –

+0

Hello C-Pound Guru 저는 열과 행을 모두 가져와야합니다 ... 충분할 것입니다. ., –

+0

시도해 보셨습니까? – Paparazzi

관련 문제