[VB] stampare un file txt

[vonkranz]

Apri il file
Leggi riga per riga finche' non arrivi alla fine
Prima di leggere la riga successiva la stampi

dim strVar
open "File.TXT" for input as 1
do while not eof(1)
   line input#1,strVar
   printer.print strVar
loop
close 1

Ciao.
PS:
..a proposito: non e' PRT ma PRN (o LPT )