Visual Basic - Eliminar los márgenes

Estoy realizando una aplicación en la que necesito que el margen superior sea nulo. Para ello utilizo el siguiente código:

Friend TextToBePrinted As String

Public Sub prt(ByVal text As String)

TextToBePrinted = text
Dim prn As New Printing.PrintDocument
Using (prn)
prn.PrinterSettings.PrinterName _
= "\\SERVIDOR\LANIER LD060 RPCS"
Dim objMargenes As New Margins(100, 100, 0, 100)
prn.DefaultPageSettings.Margins = objMargenes
AddHandler prn.PrintPage, _
AddressOf Me.PrintPageHandler
prn.Print()
RemoveHandler prn.PrintPage, _
AddressOf Me.PrintPageHandler
End Using

End Sub

Private Sub PrintPageHandler(ByVal sender As Object, _
ByVal args As Printing.PrintPageEventArgs)

Dim myFont As New Font("FuturaBT Book", 10)
args.Graphics.DrawString(TextToBePrinted, _
New Font(myFont, FontStyle.Regular), _
Brushes.Black, 50, 50)

End Sub

Con ésto:

[...]
Dim objMargenes As New Margins(100, 100, 0, 100)
prn.DefaultPageSettings.Margins = objMargenes
[...]

hago que el margen superior sea nulo, pero nunca me lo llega a eliminar. También he probado con esto otro:

prn.DefaultPageSettings.Margins.Top = 0

pero tampoco me funciona. ¿Qué es lo que pasa?

Al margen del código, que no lo he visto a fondo, hay impresoras que no pueden tener margen superior nulo, depende del sistema de toma de hoja. Hay que asegurarse primero que la impresora en cuestión pueda tener margen superior nulo.