FileSystem.EOF(Int32) Método

Definição

Devolve um valor True booleano quando o final de um ficheiro aberto para Random ou Input sequencial é alcançado.

public:
 static bool EOF(int FileNumber);
public static bool EOF(int FileNumber);
static member EOF : int -> bool
Public Function EOF (FileNumber As Integer) As Boolean

Parâmetros

FileNumber
Int32

Required. E Integer que contenha qualquer número de ficheiro válido.

Devoluções

Um valor True booleano quando se atinge o fim de um ficheiro aberto para Random ou sequencial Input .

Exceções

O modo ficheiro é inválido.

Exemplos

Este exemplo utiliza a EOF função para detetar o fim de um ficheiro. Este exemplo assume que Testfile é um ficheiro de texto que contém várias linhas de texto.

Dim TextLine As String
' Open file.
FileOpen(1, "TESTFILE", OpenMode.Input)
' Loop until end of file.
Do Until EOF(1)
    ' Read the line into a variable.
    TextLine = LineInput(1)
    ' Display the line in a message box.
    MsgBox(TextLine)
Loop
FileClose(1)

Observações

Use EOF para evitar o erro gerado ao tentar obter entrada para além do final de um ficheiro.

A EOF função retorna False até ao final do ficheiro ser alcançado. Com ficheiros abertos para Random ou Binary acesso, EOF retorna False até que a última função executada FileGet não consiga ler um registo completo.

Com ficheiros abertos para Binary acesso, uma tentativa de ler o ficheiro usando a Input função até EOF que retorne True gera um erro. Use as LOF funções e Loc em vez de EOF ao ler ficheiros binários com Input, ou use Get ao usar a EOF função. Com ficheiros abertos para Output, EOF devolve Truesempre .

Aplica-se a

Ver também