Imprimir con Printer rectangulos con esquinas redondeadas

Bueno, no tiene sentido que el fondo sea blanco en el printer, pero lo
estaba probando con un picture.
De todas maneras creo que es más práctico el método de Rubén.
Saludos,

Javier

"Javier Balkenende" escribió en el mensaje
news:%23Y$

Printer.FillStyle = 0
Printer.FillColor = vbWhite
Printer.Circle (700, 700), 400, vbBlack
Printer.Circle (2700, 700), 400, vbBlack
Printer.Line (700, 300)-(2700, 1100), vbWhite, BF
Printer.Line (700, 300)-(2700, 300), vbBlack, BF
Printer.Line (700, 1100)-(2700, 1100), vbBlack, BF

Printer.CurrentX = 1400
Printer.CurrentY = 550
Printer.Print "Prueba"

En este caso el relleno es blanco y el borde es negro.
Saludos,

Javier

"Gabriel Glez" escribió en el mensaje
news:yIROa.41689$
>
> Saludos a quisiera saber como imprimir con el objeto

printer

> rectángulos con esquinas redondeadas y rellenos de un color determinado

y

> borde determinado. Gracias de antemano
>
> Saludos Gabriel Glez
>
>
>



Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.493 / Virus Database: 292 - Release Date: 25/06/2003

Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.493 / Virus Database: 292 - Release Date: 25/06/2003