Metodo TextFieldParser.ReadLine

Articolo
09/12/2008

Aggiornamento: novembre 2007

Restituisce la riga corrente come stringa e sposta il cursore alla riga successiva.

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

Valore restituito

String

Eccezioni

La seguente condizione può causare la generazione di un'eccezione:

Il file di destinazione non esiste (FileNotFoundException).

Note

Il metodo ReadLine non esegue alcuna analisi; un carattere di fine riga all'interno di un campo delimitato viene interpretato come la fine effettiva della riga.

Se si raggiunge la fine del file, viene restituito Nothing.

Esempio

Nell'esempio riportato di seguito viene letto il file ParserText.txt che viene scritto in Testfile.txt.

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

Se Testfile.txt non esiste, viene creato dal metodo WriteAllText.

Nell'esempio riportato i campi vengono scritti come stringa singola; per consentire la visualizzazione di ogni riga sulla propria riga nel file di destinazione, è necessario aggiungere un carattere VbCrLf alla fine di ogni riga.