08/05/2007, 16:16
|
 | | | Fecha de Ingreso: mayo-2007 Ubicación: IRUN,(GUIPUZCOA) España
Mensajes: 178
Antigüedad: 17 años, 11 meses Puntos: 4 | |
 Re: Como Abrir Simbolo de Sistema Desde VB 6.0
Hola puedes con el objeto Printer.
Private Sub Command1_Click()
Printer.Orientation = 2
Printer.Print "esto es una prueba"
Printer.EndDoc
End Sub
Orientation = 2.......> Horizontal
Orientation = 1.......> Vertical
el objeto printer tiene muchas propiedades entre ellas ColorMode que permite especificar si se va impirimir en blanco y negro en cuyo caso seria valor 1 o en color valor 2.
para determinar el tamaño del papel es PaperSize cuyos valores son unas series de constantes para cada uno de los tamaños.
por ejemplo para imprimir en tamaño "A4" usariamos el valor 9/para "A3" el valor 8 / para folio el valor 14 .......
De todas formas se puede personalizar el tamaño indicando en las propiedades Width y Height el ancho y alto del papel medido en Twips.
salu2 |