printing as white blocks if Printer.Copies is set

Question posted by: madhupanisetty (Newbie) on July 24th, 2008 01:28 PM

Hi,
I am getting the text with white box when printed, and this happens only when Printer.Copies is set, am I doing any thing wrong, please help. And this issue is only on real printing, not on picture box


Code:

Private Sub Command1_Click()
Dim p As Printer
Set p = Printer

'--- working fine if I remove this line
p.Copies = 2

p.Line (10, 10)-(1000, 1000), vbBlack, BF

p.CurrentY = 10
p.ForeColor = vbWhite

p.Print ""
p.Print "s";
p.Print "d";
p.EndDoc
End Sub

Not the answer you were looking for? Post your question . . .
189,873 Experts ready to help you find a solution.
Sign up for a free account, or Login (if you're already a member).