TextFieldParser.EndOfData Proprietà

public:
 property bool EndOfData { bool get(); };

public bool EndOfData { get; }

member this.EndOfData : bool

Public ReadOnly Property EndOfData As Boolean

Valore della proprietà

True se non vi sono più dati da leggere. In caso contrario, False.

Esempio

In questo esempio viene utilizzata la EndofData proprietà per scorrere tutti i campi del file con TextFieldReader, FileReader.

Dim StdFormat As Integer() = {5, 10, 11, -1}
Dim ErrorFormat As Integer() = {5, 5, -1}
Using FileReader As New  Microsoft.VisualBasic.FileIO.
    TextFieldParser("C:\testfile.txt")

    FileReader.TextFieldType = FileIO.FieldType.FixedWidth
    FileReader.FieldWidths = StdFormat
    Dim CurrentRow As String()
    While Not FileReader.EndOfData
        Try
            Dim RowType As String = FileReader.PeekChars(3)
            If String.Compare(RowType, "Err") = 0 Then
                ' If this line describes an error, the format of the row will be different.
                FileReader.SetFieldWidths(ErrorFormat)
                CurrentRow = FileReader.ReadFields
                FileReader.SetFieldWidths(StdFormat)
            Else
                ' Otherwise parse the fields normally
                CurrentRow = FileReader.ReadFields
                For Each newString As String In CurrentRow
                    My.Computer.FileSystem.WriteAllText("newFile.txt", newString, True)
                Next
            End If
        Catch ex As Microsoft.VisualBasic.FileIO.MalformedLineException
            MsgBox("Line " & ex.Message & " is invalid.  Skipping")
        End Try
    End While
End Using

Commenti

Questa proprietà può essere utilizzata durante la lettura dai file per determinare la fine dei dati letti.

Nella tabella seguente sono elencati esempi di attività che coinvolgono la EndOfData proprietà .

Si applica a

Vedi anche

• OpenTextFieldParser(String)
• Oggetti (Visual Basic)