HOW TO：在 Visual Basic 中從逗號分隔文字檔讀取

更新：2007 年 11 月

TextFieldParser 物件提供簡便且有效的方式來剖析結構化的文字檔，例如記錄檔。TextFieldType 屬性 (Property) 會定義檔案是否為分隔的檔案，或是具有固定寬度文字欄位的檔案。

若要剖析以逗號分隔的文字檔

1. 建立新的 TextFieldParser。下列程式碼會建立名為 MyReader 的 TextFieldParser，並開啟檔案 test.txt。

   Using MyReader As New _
   Microsoft.VisualBasic.FileIO.TextFieldParser _
   ("C:\TestFolder\test.txt")
   

2. 定義 TextField 型別和分隔符號 (Delimiter)。下列程式碼會將 TextFieldType 屬性定義為 Delimited，並將分隔符號定義為 ","。

   MyReader.TextFieldType = FileIO.FieldType.Delimited
   MyReader.SetDelimiters(",")
   

3. 在檔案的欄位之間執行迴圈 (Loop)。如果有任何一行損毀，即會報告錯誤並繼續剖析。下列程式碼會在檔案之間執行迴圈，依序顯示每個欄位，並報告所有格式不正確的欄位。

   Dim currentRow As String()
      While Not MyReader.EndOfData
         Try
            currentRow = MyReader.ReadFields()
            Dim currentField As String
            For Each currentField In currentRow
               MsgBox(currentField)
            Next
            Catch ex As _
            Microsoft.VisualBasic.FileIO.MalformedLineException
            MsgBox("Line " & ex.Message & _
            "is not valid and will be skipped.")
        End Try
   

4. 使用 End While 和 End Using，以關閉 While 和 Using 區塊。

      End While
   End Using
   

範例

這個範例會讀取檔案 test.txt。

Using MyReader As New _
Microsoft.VisualBasic.FileIO.TextFieldParser("C:\testfile.txt")
   MyReader.TextFieldType = FileIO.FieldType.Delimited
   MyReader.SetDelimiters(",")
   Dim currentRow As String()
   While Not MyReader.EndOfData
      Try
         currentRow = MyReader.ReadFields()
         Dim currentField As String
         For Each currentField In currentRow
            MsgBox(currentField)
         Next
      Catch ex As Microsoft.VisualBasic.FileIO.MalformedLineException
      MsgBox("Line " & ex.Message & _
      "is not valid and will be skipped.")
      End Try
   End While
End Using

穩固程式設計

下列情形可能會造成例外狀況：

• 不可以使用指定的格式剖析資料列 (MalformedLineException)。將包含在程式行中的文字指定給 TextFieldParser.ErrorLine 屬性時，例外狀況訊息會指定造成例外狀況的程式行。

• 指定的檔案不存在 (FileNotFoundException)。

• 發生使用者權限不足而無法存取檔案的部分信任狀況。 (SecurityException).

• 路徑太長 (PathTooLongException)。

• 使用者沒有足夠的使用權限可以存取檔案 (UnauthorizedAccessException)。

請參閱

工作

HOW TO：在 Visual Basic 中從固定寬度的文字檔讀取

HOW TO：在 Visual Basic 中以多種格式從文字檔讀取

逐步解說：在 Visual Basic 中管理檔案和目錄

疑難排解：讀取和寫入文字檔

疑難排解例外狀況：Microsoft.VisualBasic.FileIO.TextFieldParser.MalformedLineException

概念

使用 TextFieldParser 物件剖析文字檔

參考

TextFieldParser 物件