crosshatched pattern on printer

[HughLerwill]

Dear All,

The following code will not produce a crosshatched pattern for me on an HP Deskjet 6127 with its native Windows driver but will if used with a driver for the HP 895 Cxi. I have had the HP6127 for a couple of years now and have kept on updating the driver hoping the problem would clear but to no avail.

Printer.ScaleMode = vbTwips
Printer.FillColor = vbBlack
Printer.PSet (Printer.ScaleWidth / 2, Printer.ScaleHeight / 2)
Printer.FillStyle = vbDownwardDiagonal
Printer.Circle Step(0, 0), Printer.ScaleWidth / 4
Printer.FillStyle = vbUpwardDiagonal

Printer.Circle Step(0, Printer.ScaleWidth / 4), Printer.ScaleWidth / 6
Printer.FillStyle = vbFSTransparent
Printer.Print
Printer.Print "Printer passes test if large circle can be seen beneath small circle"
Printer.Print " i.e. the overlapping region is cross hatched"
Printer.EndDoc

I suppose this is a problem with the HP6127 driver but has anyone else come across similar behaviour with the HP6127 or other printers.
Is there a way to improve the above code to overcome the problem?

regards Hugh,