Visual Basic - Cambiar tamaño de papel desde VB 6

Espero y alguien me pueda ayudar

Estoy desarrollando una aplicacion para imprimir en una impresora termina. desde visual Basic 6 como puedo cambiar el tamaño de hoja por codigo?

he intentado con lo siguiente, pero no me ha funcionado:

Printer.PaperSize = vbPRPSStatement

Printer.Height = 4.5
Printer.Width = 6

Alguien sabe o tiene un ejemplo?

Necesito cambiar al tamaño de impresion.

Height = 4.5
Width = 6

Es posible?

Agradezco la ayuda de antemano

Para imprimir horizontalmente:
Printer.Orientation = vbPRORLandscape

Para ajustar las coordenadas de impresión:
Printer.CurrentX y Printer.CurrentY

Para controlar el alto de impresión:
Creas una variable de contador de líneas y cuando llegue al máximo, haces un saldo de página. ejem. queremos que el máximo de líneas a imprimir sea de 15:

If nLinea = 15 Then
Printer.NewPage
nLinea = 0
End If

Hola que tal...

Lo que necesito espeficarle a la impresora es el tamaño del papel.

necesito imprimir 4.00" x 6.50" (10.16cm x 16.51 cm)

Printer.Height = 4.5
Printer.Width = 6

como cambio estos valores?

Pongo el siguiente codigo:

MsgBox "width " & Printer.Width
MsgBox "height " & Printer.Height

y me Muestra los siguientes resultados:

width 6476
height 8640

Es que el valor te lo dá en twips que es el predeterminado de la propiedad ScaleMode.

Antes de asignar los valores, si la medida es en pulgadas:
Printer.ScaleMode = vbInches

y si es en centímetros:
Printer.ScaleMode = vbCentimeters

Hola marchand

Gracias por tu respuesta. Desafortunadamente no me funcionan estas opciones, esto es lo que coloco:

Printer.ScaleMode = vbInches
Printer.Height = 4.5
Printer.Width = 6

y sigo con el mismo resultado.

Alguna otra idea?

Hola eduardo: Cuando trabajas con la propiedad height o whidth tenes que multiplicar los centimetros de ancho(whidht) o de alto(height) de la hoja por 567 y el valor que te da es el que tenes que poner donde pusiste 4.5 o 6. Espero te sirva...