I try to Draw a Rectangle around a paper. I set Left, Top margins and Width and Height...

when I print this page and when I measurement left and top margins are around 3mm difrent than seted margins.

for example when I set left and top margins ZERO
On PrintPreviewDialog. Margins are appear Left and Top Margins are ZERO

But...
After I printed page left margin is 3.2 mm and top margin is 3 mm around.


When I use this code ;

e.Graphics.PageUnit = GraphicsUnit.Millimeter
e.Graphics.ResetTransform()
e.Graphics.TranslateTransform((e.MarginBounds.X - e.PageSettings.HardMarginX) / 100.0F, (e.MarginBounds.X - e.PageSettings.HardMarginY) / 100.0F)
PrintDocument1.OriginAtMargins = True

this time left and top margins are 4 mm difrent than printed paper margins.

This is what I try ..

Code:
Private Sub PrintDocument1_PrintPage_1(sender As Object, e As Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
        Dim grpX As Graphics = e.Graphics
        e.Graphics.PageUnit = GraphicsUnit.Millimeter
        e.Graphics.ResetTransform()
        e.Graphics.TranslateTransform((e.MarginBounds.X - e.PageSettings.HardMarginX) / 100.0F, (e.MarginBounds.X - e.PageSettings.HardMarginY) / 100.0F)
        PrintDocument1.OriginAtMargins = True

        Dim style As FontStyle = FontStyle.Regular
        Dim fonts As Font = New Font(New FontFamily("Monotype Corsiva"), 12, style)
        Dim pen As New System.Drawing.Pen(System.Drawing.Color.Black, 0.01F)
        pen.DashStyle = Drawing.Drawing2D.DashStyle.Solid
        Dim pen2 As New System.Drawing.Pen(System.Drawing.Color.Blue, 0.01F)
        Dim pen3 As New System.Drawing.Pen(System.Drawing.Color.Purple, 0.01F)
        e.Graphics.Clear(Color.White)

        Dim wdth As Decimal
        Dim hght As Decimal
        Dim topSide As Decimal
        Dim leftSide As Decimal
        Dim horzGap As Decimal
        Dim VertGap As Decimal
        Dim HorLabel As Decimal
        Dim VerLabel As Decimal

        topSide = 12.9
        hght = (33.9)
        VerLabel = 8
        VertGap = 0

        leftSide = 4.65
        wdth = (99.1)
        HorLabel = 2
        horzGap = (2.5)

        grpX.DrawRectangle(pen2, CDec(0.1), CDec(0.1), CDec(209.8), CDec(296.7))
        grpX.DrawRectangle(pen, CDec(leftSide), CDec(topSide), CDec(200.7), CDec(271.2))
         
    End Sub
Is it possible to get same Margin result on the paper as set on PrintDocument ?