Visual Basic para Aplicaciones - Como imprimir

Mando imprimir utilizando el objeto PRINTER

Lo que quiero es que al imprimir un recibo que ocupa un tercio de la hoja
al ejercurse el printer.newpage, no avance hasta el final de la hoja, si no que
se detenga para cortar el recibo y poder imprimir otro.

Cuando imprimo varios recibos no tengo ningun problema.

PRUEBA LO SIGUIENTE

CONFIGURA UNA IMPRESORA CON EL TAMAÑO DE PAPEL DEL RECIBO Y ANTES DE MANDAR A IMRIMIR PON : PRINTER.DeviceName="NOMBREDEIMPRESORA"
PARA QUE TOME POR DEFAUL EL TAMAÑO QUE NECESITAS,

SALUD2, SUERTE

Victor ya hice la prueba pero no acepta la propiedad DEVICENAME

HOLA, QUE TAL:

PON EL CODIGO, PARA REVISARLO Y PODER AYUDARTE .

SALUD2

Despues de batallar un poco encontre la solucion de como imprir un
recibo y que no salte al final de la hoja, de la siguiente manera:

Dim Impresora as Printer

for Each Impresora In Printers
set Printer = impresora 'Establece la impresora
if Printer.DeviceName = "Recibos" then 'Recibos es el nombre de la impresora
exit for
endif
next

Gracias Victor por tu sugerancia