Printing in DOS mode

Hello,

I have large text in a multiline textbox. It was generated from the database. Ex.
job size qty lay bdlno opr
A01 M 25 1 10 5

job size qty lay bdlno opr
A01 M 29 1 11 6

job size qty lay bdlno opr
A01 M 25 1 12 7
.....

Around 500 rows. In the command click event, i am printing this on my default dot matrix printer. The paper is also continuous feed and is pre formated with these headings(job size qty lay bdlno opr)
There is no top margin or bottom margin. You can not find whether the paper is ended. Only thing a dotted line exist on the paper at the end of each page to cut it.So it looks likea continuous single page with the headings as specified. So i generated report from the database and stored in the text box. Why i am using this way is that the user may delete some records and start printing from that. In case power failures the user must start printing from the beginning. So, i used textbox.
Its printing one page only. How can i print continuously?

Ex:
dim strOP
strOP=txtResult.text
printer.print strOP

How can i set vertical spacing.

Thanx in advance

Have you tried:
Open "LPT1" for output as #1
print #1, variable
Close #1

En epson compatible (being ESC = CHR(27) and n the number of n/60-inch space):

ESC 0 Select 1/8-inch line spacing
ESC 1 Select 7/72-inch line spacing
ESC 2 Select 1/6-inch line spacing
ESC 3 Select 1/180-inch line spacing
ESC An Set n/60-inch line spacing

Hello,

Thanx for the reply.
Where to set the value ESC 0 or ESC 1

I am not sure.

Thanx

Open "LPT1" for output as #1
print #1, chr(27) & "0"
print #1, variable
Close #1