VB.NET System ComponentModel Win32Exception Identificador inválido

[Alessandro de Assis Maciel]

Boa tarde, alguém pode me ajudar?

 

Estou desenvolvendo um software que imprime um formulário do windows forms e estou usando a sintaxe "PrintDocument1.Print()" que imprime o que foi declarado na classe "Private Sub PrintDocument1_PrintPage(sender As Object, e As Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage", até pouco tempo estava funcionando corretamente, mais derrepende começou apresentar o erro "System.ComponentModel.Win32Exception: 'Identificador inválido'". O compilador reconhece que a sintaxe está correta, mais na depuração a  linha PrintDocument1.Print() apresenta esse erro. com informação de 

Exceção gerada: 'System.ComponentModel.Win32Exception' em System.Windows.Forms.dll
Ocorreu uma exceção sem tratamento do tipo "System.ComponentModel.Win32Exception" em System.Windows.Forms.dll
Identificador inválido.
 

 segue trecho do código:

 

Private Sub BtnIPrint_Click(sender As Object, e As EventArgs) Handles BtnIPrint.Click

        If ((TxtFren.Text() <> "") And (TxtFaz.Text() <> "")) Then
          'erro apresentado aqui

                   PrintDocument1.Print()
        Else
            MessageBox.Show("Há campo vazios, por favor, preencha os campos obrigatórios")
        End If
    End Sub

 

 Private Sub PrintDocument1_PrintPage(sender As Object, e As Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage

 Dim freng1 As New Bitmap(PctFren.Width, PctFren.Height)
        PctFren.DrawToBitmap(freng1, New Rectangle(0, 0, freng1.Width, freng1.Height))

end sub