Módulo
Conteúdo
Índice 🔎︎

# Função Input [VBA]

Retorna o fluxo aberto de uma entrada ou arquivo binário (cadeia de caracteres)

Esta função ou constante torna-se ativa pela instrução Option VBASupport 1, colocada antes do código do programa executável de algum módulo.

## Sintaxe:

    Input( Number as Integer, [# ] FileNumber as Integer)

## Valor de retorno:

String

## Parâmetros:

Number: obrigatório. Expressão numérica que especifica o número de caracteres a retornar.

#: Opcional.

FileNumber: obrigatório. Qualquer número de arquivo válido.

## Códigos de erro:

6 Excedida a capacidade

52 Nome ou número de arquivo incorreto

62 A leitura ultrapassa o fim do arquivo (EOF)

## Exemplo:

    REM ***** BASIC *****

    Option VBASupport 1

    Sub Example_Input

     Dim MyData

     Open "MyDataFile.txt" For Input As #1

     Do While Not EOF(1)

      MyData = Input(1, #1)

      Print MyData

     Loop

     Close #1

    End Sub

Tópicos relacionados

Instrução Input#

Funções de E/S do VBA