Printing problem...help

I'm trying to print Rectangle,and everything works fine,but I don't know how to set page margins. Left margin is always 2milimeters and top is always 17mm. I want printer to start printing on top of the page (closer to the edge of the paper, as much is possible)

I had no problem with this in VB 6.0
Please help.



Private Sub printDoc_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles printDoc.PrintPage

Dim pr As New Pen(Color.Black, 1)

With e.Graphics
.DrawRectangle(pr, 10, 10, 50, 50)
End With

End Sub

the PrinterSettings property of your PrintDocument (printDoc)

Quote:

---

Originally posted by WALDO
the PrinterSettings property of your PrintDocument (printDoc)

---

Still not working,there's no error message and no changes...
Please send me the code that works,if possible
Thanks

Can't you use e.MarginBounds in your subroutine to set the margins to what you want?