Stampare o Anteprima Stampa

Friend WithEvents ppdShapes As System.Windows.Forms.PrintPreviewDialog
Friend WithEvents pdShapes As System.Drawing.Printing.PrintDocument


Private Sub btnPreview_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPreview.Click
ppdShapes.ShowDialog()
End Sub

' Print without a preview.

Private Sub btnPrint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrint.Click
pdShapes.Print()
End Sub