Output To

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.

Nell'esempio seguente abbiamo un file, dal quale leggiamo; e creeremo un nuovo file, nel quale scriveremo quanto letto dal primo file:

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)

' Si impone che 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 "fl", e dunque nel file "FL". |1| |2|

Note

[1] In taluni casi si può ottenere il medesimo risultato operando più direttamente:

......
Read #st, b, Lof(st)

Print #fl, b

[2] Un esempio pratico può essere visto in questa pagina della Guide della Comunità del Forum di Gambas-it.org.