Input: differenze tra le versioni
Vai alla navigazione
Vai alla ricerca
Nessun oggetto della modifica |
Nessun oggetto della modifica |
||
| Riga 5: | Riga 5: | ||
'''Public''' Sub Button1_Click() | '''Public''' Sub Button1_Click() | ||
Dim f As File | |||
Dim a$ As String | |||
Input #f, a$ | |||
Print a$ | |||
'''End''' | '''End''' | ||
sarà letta soltanto la stringa "gallo", e sarà inserita nella variabile "a$". | sarà letta soltanto la stringa "gallo", e sarà inserita nella variabile "a$". | ||
Con ''Input'' possiamo inserire anche più variabili, ove caricare i valori, ossia le varie stringhe presenti nel file di testo e separate ciascuna dall'altra da uno spazio o da un carattere di "nuova riga": | |||
'''Public''' Sub Button1_Click() | |||
Dim f As File | |||
Dim a$, b$, c$ As String | |||
Input #f, a$, b$, c$ | |||
Print a$, b$, c$ | |||
'''End''' | |||
saranno lette: gallo gatto ratto. | |||
Versione delle 16:18, 3 giu 2012
Input legge le stringhe in un File di testo fino all'interruzione dello spazio o al carattere di "nuova linea", e le immette ciascuna in una propria variabile.
Esempio. Poniamo di avere un file, creato con un editor di testo, contenente queste tre stringhe: gallo gatto ratto. Leggendo con Input avremo:
Public Sub Button1_Click() Dim f As File Dim a$ As String Input #f, a$ Print a$ End
sarà letta soltanto la stringa "gallo", e sarà inserita nella variabile "a$".
Con Input possiamo inserire anche più variabili, ove caricare i valori, ossia le varie stringhe presenti nel file di testo e separate ciascuna dall'altra da uno spazio o da un carattere di "nuova riga":
Public Sub Button1_Click() Dim f As File Dim a$, b$, c$ As String Input #f, a$, b$, c$ Print a$, b$, c$ End
saranno lette: gallo gatto ratto.