TextFieldParser.EndOfData-Eigenschaft

Článek
08/20/2008

Aktualisiert: November 2007

Gibt True zurück, wenn sich zwischen der aktuellen Cursorposition und dem Dateiende keine nicht leeren, kommentarlosen Zeilen befinden.

' Usage
Dim value As Boolean = TextFieldParserObject.EndOfData
' Declaration
Public ReadOnly Property EndOfData As Boolean

Rückgabewert

Boolean.

Hinweise

Diese Eigenschaft kann beim Lesen aus Dateien verwendet werden, um das Ende der gelesenen Daten zu bestimmen.

Aufgaben

In der folgenden Tabelle werden Beispiele für Aufgaben mit der EndOfData-Eigenschaft aufgeführt.

Zweck	Weitere Informationen finden Sie unter
Lesen aus einer Datei mit Trennzeichen	Gewusst wie: Lesen aus durch Kommas getrennten Textdateien in Visual Basic
Lesen aus einer Datei mit fester Breite	Gewusst wie: Lesen aus einer Textdatei mit fester Breite in Visual Basic

Beispiel

In diesem Beispiel wird die EndofData-Eigenschaft verwendet, um mit dem TextFieldReaderFileReader alle Felder in der Datei zu durchlaufen.

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

Anforderungen

Namespace: Microsoft.VisualBasic.FileIO

Klasse: TextFieldParser

Assembly: Visual Basic-Laufzeitbibliothek (in Microsoft.VisualBasic.dll)

Berechtigungen

Die folgenden Berechtigungen sind erforderlich:

Berechtigung	Beschreibung
FileIOPermission	Steuert die Fähigkeit, auf Dateien und Ordner zuzugreifen. Zugeordnete Enumeration: Unrestricted.
SecurityPermission	Beschreibt einen Satz von Sicherheitsberechtigungen, die auf Code angewendet werden. Zugeordnete Enumeration: ControlEvidence.

Weitere Informationen finden Sie unter Codezugriffssicherheit und unter Anfordern von Berechtigungen.

Siehe auch

Referenz

TextFieldParser-Objekt

TextFieldParser.EndOfData

Sdílet prostřednictvím