Mostrar tudo

Ocultar tudo

Devolve um Número Inteiro (tipo de dados Número inteiro: tipo de dados fundamental que contém números inteiros. Uma variável Número inteiro é armazenada como um número de 16 bits (2-bytes) que varia entre -32.768 e 32.767.) que contém o valor Booleano (booleano: expressão que pode ser avaliada como verdadeira (diferente de zero) ou falsa (0). Pode utilizar as palavras-chave Verdadeiro e Falso para fornecer os valores -1 e 0, respectivamente. O tipo de dados de campo Sim/Não é booleano e tem o valor de -1 para Sim.) Verdadeiro quando for atingido o fim de um ficheiro aberto para Entrada Aleatória ou sequencial.

Sintaxe

EOF(númeroficheiro)

O argumento (argumento: valor que fornece informações a uma acção, evento, método, propriedade, função ou procedimento.) númeroficheiro consiste num Número Inteiro que contenha qualquer número de ficheiro (número de ficheiro: número utilizado na instrução Open para abrir um ficheiro. Utilize números de ficheiro no intervalo 1 - 255, inclusive, para ficheiros não acessíveis para outras aplicações. Utilize números de ficheiro no intervalo 256 - 511 para ficheiros acessíveis a partir de outras aplicações.) válido.

Observações

Utilize a função EOF para evitar o erro gerado ao tentar obter entradas depois do fim de um ficheiro.

A função EOF devolve um valor Falso até o fim do ficheiro ser atingindo. Com ficheiros abertos para acesso Aleatório ou Binário, a função EOF devolve um valor Falso até que a última instrução Obter não consiga ler um registo inteiro.

Com ficheiros abertos para acesso Binário, uma tentativa de leitura do ficheiro utilizando a função Entrada até que EOF devolva um valor Verdadeiro gera um erro. Utilize as funções LOF e Loc em vez de EOF durante a leitura de ficheiros binários com Entrada ou utilize Obter quando utilizar a função EOF. Com ficheiros abertos para Saída, EOF devolve sempre um valor Verdadeiro.

Exemplo

 Nota   Os exemplos que se seguem demonstram a utilização desta função num módulo do Visual Basic for Applications (VBA). Para mais informações sobre como trabalhar com VBA, seleccione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de procura.

Este exemplo utiliza a função EOF para detectar o final de um ficheiro. Este exemplo assume que MYFILE é um ficheiro de texto com poucas linhas de texto.

Dim InputData

' Open file for input.
Open "MYFILE" For Input As #1	
' Check for end of file.
Do While Not EOF(1)		
    ' Read line of data.
    Line Input #1, InputData  
    ' Print to the Immediate window.  	
    Debug.Print InputData    	
Loop
' Close file.
Close #1