TextFieldParser.ReadLine-Methode

Artikel
08/20/2008

Aktualisiert: November 2007

Gibt die aktuelle Zeile als Zeichenfolge zurück und setzt den Cursor in die nächste Zeile.

' Usage
Dim value As String = TextFieldParserObject.ReadLine()
' Declaration
Public Function ReadLine() As String

Rückgabewert

String

Ausnahmen

Die folgende Bedingung verursacht möglicherweise das Auslösen einer Ausnahme:

Die Zieldatei ist nicht vorhanden (FileNotFoundException).

Hinweise

Die ReadLine-Methode führt keine Analyse aus. Ein Zeilenendezeichen in einem Feld mit Trennzeichen wird als das tatsächliche Zeilenende interpretiert.

Nothing wird zurückgegeben, wenn das Ende der Datei erreicht wurde.

Beispiel

In diesem Beispiel wird die Datei ParserText.txt gelesen und in Testfile.txt geschrieben.

Using MyReader As New Microsoft.VisualBasic.FileIO.TextFieldParser("C:\ParserText.txt")
    MyReader.TextFieldType = Microsoft.VisualBasic.FileIO.FieldType.Delimited
    MyReader.Delimiters = New String() {","}
    Dim currentRow As String
    While Not MyReader.EndOfData
        Try
            currentRow = MyReader.ReadLine()
            My.Computer.FileSystem.WriteAllText _
           ("C://testfile.txt", currentRow, True)
        Catch ex As Microsoft.VisualBasic.FileIO.MalformedLineException
            MsgBox("Line " & ex.Message & " is invalid.  Skipping")
        End Try
    End While
End Using

Wenn Testfile.txt nicht vorhanden ist, wird die Datei von der WriteAllText-Methode erstellt.

In diesem Beispiel werden die Felder als eine einzige Zeichenfolge geschrieben. Wenn jede Zeile in der Zieldatei in einer eigenen Zeile angezeigt werden soll, muss am Ende jeder Zeile ein VbCrLf-Zeichen angefügt werden.