Visual Basic.NET - imprimir printdocument

Estoy imprimiendo un gridview en vb.net 2005, el problema es que solo me imprime 1 hoja y son tres, alguien me podria revisar este codigo a ver que estoy haciendo mal. muchas gracias.
Private Sub PrintDocument1_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
Dim linesPerPage As Single = 0
Dim yPos As Single = 0
Dim leftMargin As Single = 30
Dim topMargin As Single = e.MarginBounds.Top - 30
Dim line As String = Nothing
linesPerPage = e.MarginBounds.Height / printFont.GetHeight(e.Graphics)

Dim Fil, Col As Int32
Dim LString As String = ""
LString = LString & "ESCUELA " & vbCrLf & vbCrLf '& vbCrLf & vbCrLf
LString = LString & " REPORTE DE ESTUDIANTES ACTIVOS " & vbCrLf & vbCrLf '& vbCrLf & vbCrLf
LString = LString & " Fechas:" & " -- " & " Del " & " -- " & Me.Txdate1.Text & vbCrLf & vbCrLf '& " -- " & " al " & " -- " & Me.Txdate2.Text & vbCrLf & vbCrLf '& vbCrLf"
LString = LString & " Total " & " " & Me.Txtotal.Text & vbCrLf & _
"------------------------------------------------------------------------------------------------" & vbCrLf & vbCrLf
count = 0
For Fil = 0 To Me.DGridView1.Rows.Count - 1
For Col = 0 To Me.DGridView1.Columns.Count - 1
Call RellenarEsp(Me.DGridView1.Item(Col, Fil).Value, Fil)
LString = LString & ncadena & Space(3)
Next
count += 1
LString = LString & vbCrLf
Next

yPos = topMargin + (count * printFont.GetHeight(e.Graphics))

e.Graphics.DrawString(LString, New Font("arial", 9, FontStyle.Regular), Brushes.Black, 100, 80)

If Not (line Is Nothing) Then
e.HasMorePages = True
Else
e.HasMorePages = False
End If

End Sub

Vamos a ver si consigo explicártelo, yo estoy en este momento peleándome con PRINTDOCUMENT desde VB NET 2010, el problema es que PRINTDOCUMENT carece de salto de pagina, vale, ya lo se, es una gran cagada de Microsoft, pero es lo que hay.
Por lo que tienes que entender que tu bucle terminara y nunca habrá generado un salto de página.

Lo que hace “e.HasMorePages = True” no es un salto de pagina, no es mas que un entra de nuevo al evento “PrintPage” y esta es la única manera de seguir imprimiendo en una segunda hoja en el mismo documento, tu lo tienes fácil, basta con que controles el numero de linea del que te sales y comienzas por ella en el primer “FOR”.
Imagina si lo que quieres conseguir es imprimir una factura tirando directamente desde la base de datos, pues ese es mi problema.

Después detecto algunas cosas que no me cuadran

“yPos = topMargin + (count * printFont.GetHeight(e.Graphics)) “
¿
Para que es esto?

”e.Graphics.DrawString(LString, New Font("arial", 9, FontStyle.Regular), Brushes.Black, 100, 80)”
¿No imprimirá siempre en la misma posición?