Função Input
Retorna Cadeia de caracteres contendo caracteres de um arquivo aberto no modo de entrada ou binário .
Sintaxe
Entrada(número, [ # ]filenumber)
A sintaxe da função de entrada tem estas partes:
| Sair | Descrição |
|---|---|
| número | Obrigatório. Qualquer expressão numérica válida que especifique o número de caracteres a serem retornados. |
| númerodoarquivo | Obrigatório. Qualquer número de arquivo válido. |
Valor de retorno
Cadeia de caracteres
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 Input # , 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
Este exemplo usa a função Entrada para ler um caractere por vez de um arquivo e imprimi-lo na janela Imediata. Esse exemplo supõe que TESTFILE é um arquivo de texto com poucas 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.
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.