Visual Basic - Encabezado con Printer.print

Estoy imprimiendo un data1 y nececito saber como hacer 2 cosas:
1.-Como colocar un encabezado a cada pagina
2.-Como hacer para que despues de imprimir 48 lineas me salte a la otra hoja , me coloque el encabezado y asi todo hasta terminar todos los registros del data1.

Gracias

Crea una variable que pones a cero al empezar a imprimir, despues de cada linea de impresion incrementala en una unidad y despeues de estas lineas añade una rutina o bien lo pones a continuacion diciendo lo siguiente:

contador=0
...
...
printer.print encabezado
contador=contador+1
if contador>=numero_de_lineas_que_quieres
printer.newpage
contador=0
printer.print cabecera
endif
Saludos y suerte