Propriedade TextFieldParser.LineNumber

Artigo
08/25/2010

Retorna o número da linha atual, ou retorna -1 se mais nenhum caractere está disponível na série.

' Usage
Dim value As Long = TextFieldParserObject.LineNumber
' Declaration
Public ReadOnly Property LineNumber As Long

Valor de retorno

Valor de propriedade

Integer.

Comentários

Este é um membro avançado; ele não exibe em IntelliSense a não ser que você clique na lingueta All.

Linhas em branco e comentários são ignorados quando se determina a linha de comando.

Exemplo

Este exemplo procura o nome "Jones" no arquivo de texto e relata em que linha ele ocorre.

Using FileReader As New Microsoft.VisualBasic.FileIO.TextFieldParser("C:\ParserText.txt")
    FileReader.TextFieldType = Microsoft.VisualBasic.FileIO.FieldType.Delimited
    FileReader.Delimiters = New String() {","}
    Dim currentRow As String()
    While Not FileReader.EndOfData
        Try
            currentRow = FileReader.ReadFields()
            Dim currentField As String
            For Each currentField In currentRow
                If currentField = "Jones" Then
                    MsgBox("The name Jones occurs on line " & _
                    FileReader.LineNumber)
                End If
            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