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

更新：2007 年 11 月

TextFieldParser 物件提供簡便且有效的方式來剖析結構化的文字檔，例如記錄檔。

TextFieldType 屬性 (Property) 會定義檔案是否為分隔的檔案，或是具有固定寬度文字欄位的檔案。若要在固定寬度的檔案中指定可變動寬度的欄位，請將欄位寬度定義為 -1。

若要剖析固定寬度的文字檔

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

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

2. 將 TextFieldType 屬性定義為 FixedWidth，並定義寬度和格式。下列程式碼會定義文字的資料行：第一個資料行為 5 個字元寬、第二個為 10 個字元寬、第三個為 11 個字元寬，而第四個資料行的寬度是可變動的。

   Reader.TextFieldType = _
   Microsoft.VisualBasic.FileIO.FieldType.FixedWidth
   Reader.SetFieldWidths(5, 10, 11, -1)
   

3. 在檔案的欄位之間執行迴圈 (Loop)。若有任何一行毀損，則報告錯誤並繼續剖析。

   Dim currentRow As String()
      While Not Reader.EndOfData
         Try
            currentRow = Reader.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.log。

Using Reader As New _
Microsoft.VisualBasic.FileIO.TextFieldParser("C:\TestFolder\test.log")
   Reader.TextFieldType = _
   Microsoft.VisualBasic.FileIO.FieldType.FixedWidth
   Reader.SetFieldWidths(5, 10, 11, -1)
   Dim currentRow As String()
   While Not Reader.EndOfData
      Try
         currentRow = Reader.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 物件