Funzione Input [VBA]

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

warning

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


Sintassi:


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

Valore restituito:

String

Parametri:

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

#: facoltativo.

FileNumber: obbligatorio. Qualsiasi numero di file valido.

Codici di errore:

6 Overflow

52 Nome file o numero file errato

62 Lettura oltre la fine del file

Esempio:


        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
    

Sosteneteci!