Applies ToAccess para Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Observação: A função, método, objeto ou propriedade descrita neste tópico será desabilitada se o Serviço de Expressão de Jato da Microsoft estiver em execução no modo de área restrita, o que impede a avaliação de expressões potencialmente inseguras. Para obter mais informações sobre o modo de área restrita, procure por "modo de área restrita" na Ajuda.

Retorna um Inteiro que contém o valor BoolianoTrue quando o final de um arquivo aberto para EntradaAleatória ou Sequencial foi atingido.

Sintaxe

EOF( filenumber )

O número de arquivos necessárioargumento é um Inteiro que contém qualquer número do arquivo válido .

Comentários

Use o EOF para evitar o erro gerado ao tentar obter a entrada após o final de um arquivo.

A função EOF retorna False até que o final do arquivo tenha sido atingido. Com arquivos abertos para acesso aleatório ou binário , o EOF retorna False até que a última instrução Get executada não consiga ler um registro inteiro.

Com arquivos abertos para acesso binário , uma tentativa de ler o arquivo usando a função De entrada até que o EOF retorne True gera um erro. Use as funções LOF e Loc em vez de EOF ao ler arquivos binários com Entrada ou use Get ao usar a função EOF . Com arquivos abertos para Saída, o EOF sempre retorna True.

Exemplo

Observação: Exemplos a seguir demonstram o uso dessa função em um módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência do Desenvolvedor na lista suspensa ao lado de Pesquisar e insira um ou mais termos na caixa de pesquisa.

Este exemplo usa a função EOF para detectar o fim de um arquivo. Este exemplo pressupõe que MYFILE é um arquivo de texto com algumas 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    

Precisa de mais ajuda?

Quer mais opções

Explore os benefícios da assinatura, procure cursos de treinamento, saiba como proteger seu dispositivo e muito mais.

As comunidades ajudam você a fazer e responder perguntas, fazer comentários e ouvir especialistas com conhecimento avançado.