Código de Visual Basic - Imprimir con Printer alineando a la derecha

Imprimir con Printer alineando a la derecha

Visual Basic

(7)

Publicado el 7 de Febrero del 2002 por Administrador (718 códigos)

23.813 visualizaciones desde el 7 de Febrero del 2002

Este código imprime valores númericos y texto alineados a la derecha

Versión 1
(7)

Publicado el 7 de Febrero del 2002

gráfica de visualizaciones de la versión: Versión 1

23.814 visualizaciones desde el 7 de Febrero del 2002

Crea un formulario nuevo, y copia el código.
Ejecuta el formulario y pulsa sobre el mismo con el ratón.

Private Sub Form_Click()

    Printer.Font = "Arial"

    Printer.FontSize = 14

    Printer.CurrentY = 100

    Printer.CurrentX = 2000 - TextWidth(Format(1000, "#,##0"))

    Printer.Print Format(1000, "#,##0")

    Printer.CurrentY = 400

    Printer.CurrentX = 2000 - TextWidth("16% IVA " & Format((1000 * 0.16), "#,##0"))

    Printer.Print "16% IVA " & Format((1000 * 0.16), "#,##0")

    Printer.CurrentY = 700

    Printer.CurrentX = 2000 - TextWidth("Total : " & Format((1000 * 1.16), "#,##0"))

    Printer.Print "Total : " & Format((1000 * 1.16), "#,##0")

    Printer.EndDoc

End Sub

Comentarios sobre la versión: Versión 1 (7)

Fernando Valdez

26 de Abril del 2002

Al autor de esta rutina , permitame decirle !Gracias ! , Me estoy iniciando en Visual Basic despues de pasar años en Clipper y estaba atorado sobre como usar el objeto Printer, y esta rutina me explico lo que necesitaba.

Gracias

Responder

Lucyfer

11 de Marzo del 2003

Al igual que el anterior, estoy saliendo de Clipper y esto me es muy util.

Responder

ricardo

5 de Abril del 2006

sencillo, pero muy efectivo

Responder

Carlos Mora

24 de Mayo del 2006

Si tengo una hoja mas pequeña y quiero a cada hoja imprimirle un consecutivo, donde le digo el tamaño de la hoja, o en que posicion me debe de imprimir cada vez que termine una impresion...

Gracias por la colaboracion

Responder

Carlos Mora

26 de Mayo del 2006

como hago para controlar el tamaño de la hoja, esta bueno el codigo pero solo esta para tamaño carta

Responder

Carlos Mora

26 de Mayo del 2006

como hago para controlar el tamaño de la hoja, esta bueno el codigo pero solo esta para tamaño carta

Responder

german

7 de Julio del 2006

Ha realizado una valoración positiva de este curso.