Descrizione ingresso
Restituisce il flusso aperto di un file di input o binario (stringa).
Sintassi di input
1 | Input(Numero, [#]Numero File) |
L'istruzione Input contiene 2 argomenti:
Numero: Il numero di caratteri da restituire.
Numero file:Numero di file valido.
Esempi di istruzione di input VBA di Excel
Per testare l'istruzione Input, creare un file di testo "test.txt" sull'unità D. (D:\test.txt) Si supponga che il contenuto del file sia il seguente.
123 | abc1 2 3xy z |
Si prega di eseguire il seguente codice.
1234567891011 | Sub Input_Fx_Example()Dim strContent As StringDim MyCharApri "D:\test.txt" per l'input come #1 'Apri file.Do While Not EOF(1) ' Ciclo fino alla fine del file.MyChar = Input(1, #1) ' Ottieni un carattere.strContent = strContent & MyChar 'Ciclo continuoMsgBox strContentChiudi #1 'Chiudi file.Fine sottotitolo |
Quindi, il risultato sarà il seguente.