Differenze tra le versioni di "Output To"
Da Gambas-it.org - Wikipedia.
| Riga 5: | Riga 5: | ||
'''Public''' Sub Button1_Click() | '''Public''' Sub Button1_Click() | ||
| − | + | Dim st, fl As File | |
| − | + | Dim b As Byte | |
| − | |||
| − | + | st = Open "percorso_del_file_st" For Read | |
| − | Print "b = "; b | + | fl = Open "percorso_del_file_fl" For Create |
| + | |||
| + | |||
| + | <FONT color=#006400>' ''Legge l'intero file di testo "st":''</font> | ||
| + | Read #st, b, Lof(st) | ||
| + | |||
| + | <FONT color=#006400>' ''Il flusso di dati sarà reindirizzato dalla console al file "fl":''</font> | ||
| + | <FONT color=#B22222>Output To</font> #fl | ||
| + | |||
| + | <FONT color=#006400>' ''Quindi il contenuto del "Print" sarà scritto nel file "fl", | ||
| + | ' ''anziché, come di consueto, nella console:''</font> | ||
| + | Print "b = "; b | ||
'''End''' | '''End''' | ||
Versione delle 15:09, 3 set 2012
Output To redirige l'uscita, ossia lo standard output, predefinita in un altro flusso.
L'uscita predefinita viene usata da PRINT e WRITE, quando non gli vengono specificati argomenti specifici.
Public Sub Button1_Click()
Dim st, fl As File
Dim b As Byte
st = Open "percorso_del_file_st" For Read
fl = Open "percorso_del_file_fl" For Create
' Legge l'intero file di testo "st":
Read #st, b, Lof(st)
' Il flusso di dati sarà reindirizzato dalla console al file "fl":
Output To #fl
' Quindi il contenuto del "Print" sarà scritto nel file "fl",
' anziché, come di consueto, nella console:
Print "b = "; b
End
La stampa del risultato non avverà più in console, ma i dati saranno rediretti nella variabile di tipo Stream: " f ". |1| |2|
Note
[1] In taluni casi si può ottenere il medesimo risultato operando più direttamente:
...... Line Input #st, b Print #f, b
[2] Un esempio pratico può essere visto in questa pagina della Guide della Comunità del Forum di Gambas-it.org.
