If not all Text Printed then start new page

[Dragnorian]

Hello! I am developing an application and I want to utilize the print feature on it. I have got the printing down, full page, word wrap and stuff. Anyways, I wanna have it print to a new page if all words have not printed properly. Anyway? Like it detect it with New Rectangle for the word wrap? VB.NET, Thanks too!
Code:

    Private Sub PrintDocument1_PrintPage(sender As Object, e As PrintPageEventArgs) Handles PrintDocument1.PrintPage
        Dim font As New Font("Times New Roman", 12, FontStyle.Regular)
        'Possible new Solution!
        e.Graphics.DrawString(rtbVerticalText.Text & vbNewLine & "Incremented By: " & increment, font, Brushes.Black, New Rectangle(50, 60, 700, 800))
        e.HasMorePages = True
    End Sub