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 Cadeia de caracteres contendo caracteres de um arquivo aberto no modo de entrada ou binário .

Sintaxe

Entrada( número, [# ] número de arquivos)

A sintaxe da função de entrada tem esses argumentos:

Argumento

Descrição

número

Obrigatório. Qualquer expressão numérica válido especificando o número de caracteres a serem retornados.

número de arquivos

Obrigatório. Qualquer número do arquivo válido .

Comentários

Os dados lidos com a função Entrada geralmente são gravados em um arquivo com Print # ou Put. Use essa função somente com arquivos abertos no modo De entrada ou binário .

Ao contrário da instrução Entrada # , a função Input retorna todos os caracteres que lê, incluindo vírgulas, retornos de transporte, feeds de linha, aspas e espaços principais.

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 .

Observação:  Use a função InputB para dados de bytes contidos em arquivos de texto. Com o InputB, o número especifica o número de bytes a serem retornados em vez do número de caracteres a serem retornados.

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 Entrada para ler um caractere por vez de um arquivo e imprimi-lo na janela Imediata . Este exemplo pressupõe que TESTFILE é um arquivo de texto com algumas linhas de dados de exemplo.

Dim MyCharOpen "TESTFILE" For Input As #1    ' Open file.Do While Not EOF(1)    ' Loop until end of file.    MyChar = Input(1, #1)    ' Get one character.    Debug.Print MyChar  ' Print to the Immediate window.LoopClose #1    ' Close file.

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.