Como manipulo las propiedades de la impresora

Rodolfo
16 de Julio del 2004
estoy utilizando DataReport y mi reporte debe ser impreso en una Hoja Horizontal, ¿Comó puedo manipular las propiedades de la impresora para poder hacer el cambio de la hoja?

tecniCam
16 de Julio del 2004
Usa las PROPIEDADES y las CONSTANTES del objeto PRINTER (Impresora).

Ejemplo de la propiedad Page
En este ejemplo se imprimen tres páginas de texto con el número de página actual al principio de cada una de ellas. Para probarlo, pegue el código en la sección Declaraciones de un formulario, presione F5 y haga clic en el formulario.

Private Sub Form_Click ()
Dim Header, I, Y ' Declara variables.
Print "Imprimiendo..." ' Avisa en el formulario.
Header = "Demostración de impresión - Página " ' Establece la cadena ' de encabezado.
For I = 1 To 3
Printer.Print Header; ' Imprime el encabezado.
Printer.Print Printer.Page ' Imprime el número de página.
Y = Printer.CurrentY + 10 ' Establece la posición de la línea.
' Dibuja una línea atravesando la página.
Printer.Line (0, Y) - (Printer.ScaleWidth, Y) ' Dibuja una línea.
For K = 1 To 50
Printer.Print String(K, " "); ' Imprime una cadena de espacios.
Printer.Print "Visual Basic "; ' Imprime texto.
Printer.Print Printer.Page ' Imprime el número de página.
Next
Printer.NewPage
Next I
Printer.EndDoc
End
End Sub