TextFieldParser.EndOfData (Propiedad)

Actualización: noviembre 2007

Devuelve True si no hay líneas que no están en blanco y no son de comentario entre la posición actual del cursor y el final del archivo.

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

Valor devuelto

Boolean.

Comentarios

Se puede utilizar esta propiedad al leer de los archivos para determinar el final de los datos que se están leyendo.

Tareas

La tabla siguiente muestra una lista de ejemplos de tareas en las que está implicada la propiedad EndOfData.

Para	Vea
Leer de un archivo delimitado	Cómo: Leer archivos de texto delimitado por comas en Visual Basic
Leer de un archivo de ancho fijo	Cómo: Leer archivos de texto de ancho fijo en Visual Basic

Ejemplo

Este ejemplo utiliza la propiedad EndofData para recorrer en iteración todos los campos del archivo con TextFieldReader, FileReader.

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

Requisitos

Espacio de nombres:Microsoft.VisualBasic.FileIO

Clase:TextFieldParser

Ensamblado: biblioteca en tiempo de ejecución de Visual Basic (en Microsoft.VisualBasic.dll)

Permisos

Se requieren los siguientes permisos:

Permiso	Descripción
FileIOPermission	Controla la capacidad de tener acceso a archivos y carpetas. Enumeración asociada: Unrestricted.
SecurityPermission	Describe un conjunto de permisos de seguridad aplicados al código. Enumeración asociada: ControlEvidence.

Para obtener más información, vea Seguridad de acceso a código y Solicitar permisos.

Vea también

Referencia

TextFieldParser (Objeto)

TextFieldParser.EndOfData