Printing problem...help

[kiko]

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

[WALDO]

the PrinterSettings property of your PrintDocument (printDoc)

[kiko]

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

[trisuglow]

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