imprimir por impresora linea recta mas gruesa

[corlo]

Hola soy Corlo
Mi problema es el siguiente:
Cuando lo hago por pantalla me lo hace bien

en un commandbutton1

Código [Seleccionar] Expandir



DrawWidth = 5
DrawStyle = 2

Line (950, 2950)-(12000, 2950)





Pero cuando lo hago por impresora, no me  hace nada

intento hacer esto:

Código [Seleccionar] Expandir






DrawWidth = 5
DrawStyle = 2




Printer.Line (950, 2950)-(12000, 2950)




Printer.EndDoc






pero no sale, he buscado por internet y no encuentro la solucion, gracias

[EdePC]

A mí si me funciona, tendrías que explicar bien la parte de "No me hace nada", quizá no tengas impresora o no hayas puesto como predeterminada la impresora adecuada (Panel de Control > Dispositivos e Impresoras, seleccionar tu impresora y le das click derecho > establecer como predeterminado)

- Recomiendo usar una Impresora Virtual como la que ya trae Windows, Imprimir a PDF, o a XPS, o Adobe PDF, etc, cualquiera que tengas.

[corlo]

Hola EDEPC, Gracias por contestar

ya he conseguido que me imprime la linea recta, pero no me hace la linea gruesa

Código [Seleccionar] Expandir




Printer.Print , "Hola"

DrawWidth = 5
DrawStyle = 2

Line (950, 2950)-(12000, 2950)


Printer.Line (950, 2950)-(12000, 2950)




Printer.EndDoc







Gracias

[Serapis]

Porque el drawwidth, se lo estás aplicando al objeto form, no al objeto printer...

Código (vb) [Seleccionar] Expandir


Printer.DrawWidth = 5
Printer. '... Sus métodos y propiedades... Si se omite el objeto, se sobreentiende el local, un form, Usercontrol, etc...


[corlo]

Hola nebire


justo lo que necesitaba, ya lo he probado y funciona perfecto


gracias