Observação: Desejamos fornecer o conteúdo da Ajuda mais recente no seu idioma da forma mais rápida possível. Esta página foi traduzida de forma automatizada e pode conter imprecisões ou erros gramaticais. Nosso objetivo é que este conteúdo seja útil para você. As informações foram úteis? Dê sua opinião no final desta página. Aqui está o artigo em inglês para facilitar a referência.
Observação: A função, método, objeto ou propriedade descrito neste tópico será desabilitada se o Microsoft Jet Expression Service está em execução no modo de área restrita, o que impede a avaliação das expressões possivelmente não seguras. Para obter mais informações sobre o modo seguro, procure por "modo seguro" na Ajuda.
Retorna a cadeia de caracteres que contém caracteres de um arquivo aberto no modo de entrada ou binário .
Sintaxe
Entrada ( número, [# ] filenumber)
A sintaxe da função entrada possui os seguintes argumentos:
Argumento | Descrição |
---|---|
número |
Necessário. Qualquer válido expressão numérica especificando o número de caracteres a ser retornado. |
filenumber |
Necessário. Qualquer válido número do arquivo. |
Comentários
Dados lidos com a função Input geralmente são gravados em um arquivo com Print # ou colocar. Use esta função somente com arquivos abertos no modo de entrada ou binário .
Ao contrário de instrução Input # , a função Input retorna todos os caracteres que lê, incluindo vírgulas, retornos de carro, avanços de linha, aspas e espaços à esquerda.
Com arquivos abertos para acesso binário , uma tentativa de ler o arquivo usando a função Input até EOF retorna True gera um erro. Use as funções LOF e Loc em vez de EOF ao ler arquivos binários com entradaou uso obter quando a função EOF .
Observação: Use a função InputB para dados de bytes contidos em arquivos de texto. Com InputB, número Especifica o número de bytes para retornar em vez do número de caracteres a ser retornado.
Exemplo
Observação: Exemplos a seguir demonstram o uso dessa função em um Visual Basic para módulo Applications (VBA). Para obter mais informações sobre como trabalhar com o VBA, selecione a Referência do desenvolvedor na lista suspensa ao lado de pesquisa e insira um ou mais termos na caixa de pesquisa.
Este exemplo usa a função Input para ler um caractere por vez de um arquivo e imprimi-lo para a janela imediata . Este exemplo pressupõe que TESTFILE é um arquivo de texto com algumas linhas de dados de exemplo.
Dim MyChar
Open "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.
Loop
Close #1 ' Close file.