File di che tipo? di testo? se è così:

codice:
Open file For Input As 1
Do
Line Input #1, a
Printer.Print a
Loop Until EOF(1)
Close 1
Printer.EndDoc
Altrimenti specifica che tipo di file