Funzione Input [VBA]

Restituisce un flusso aperto di un input o un file binario (stringa).

Questa funzione o costante viene abilitata con l'istruzione Option VBASupport 1 posizionata prima del codice eseguibile del programma all'interno del modulo.

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

String

Numero: obbligatorio. Espressione numerica che specifica il numero di caratteri da restituire.

#: facoltativo.

FileNumber: obbligatorio. Qualsiasi numero di file valido.

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