printing causes form to close - Programmers Heaven

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!


Welcome to the new platform of Programmer's Heaven! We apologize for the inconvenience caused, if you visited us from a broken link of the previous version. The main reason to move to a new platform is to provide more effective and collaborative experience to you all. Please feel free to experience the new platform and use its exciting features. Contact us for any issue that you need to get clarified. We are more than happy to help you.

printing causes form to close

apenticoffapenticoff Posts: 63Member
I have a strange error. When I print to a printer, it causes the form to close.

here is the code:

Private Sub PrintALabel()

Me.printdoc = New PrintDocument
Me.printdoc.Print() ' This line cause the form to close

End Sub
Private Sub printdoc_printpage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) _
Handles printdoc.PrintPage

Dim XDate As Date = Now()
Dim pfont12 As Font = New Font("Arial", 12)
Dim pfont10 As Font = New Font("Arial", 10)

commenting out the Me.printdoc.Print line makes the form stay open but nothing prints naturally.
Anyone know what causes this behavior, and how to prevent it?

Thanks, Art
Sign In or Register to comment.