TextFieldParser.LineNumber 屬性

發行項
08/21/2008

更新：2007 年 11 月

傳回目前行號，如果資料流中沒有其他可用的字元則傳回 -1。

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

傳回值

Integer.

備註

這是進階的成員，除非您按一下 [全部] 索引標籤，否則不會顯示在 IntelliSense 中。

系統在決定行號時，會忽略空白行和註解。

範例

這個範例會在文字檔中搜尋名字 "Jones"，並報告是在哪一行。

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