PrintDocument,PrintDialog and PrintPreviewDialog control in VB.NET

PrintDocument:-

A visual basic PrintDocument control is used to represent a printed document. The PrintDocument object encapsulate all the information needed to print a Document. It handles the Event and operations of printing. PrintDocument exposes three properties which are given below


Properties of PrintDocument control:-

• PrintController:- Describe how each page is guided through the printing process. 
• PrinterSettings:-contains information about the capabilities and setting of the printer. 
• DefaultPageSettings:-Encapsulates the configuration for printing each printed page.
   

• Document:- This property determines the PrintDocument used to obtain PrinterSettings. 
• PrintToFile:- This property determines Whether the Print to file CheckBox is enabled. 
• PrinterSettings:- This property sets the PrinterSettings dialog box to modify.
   

• Rows:- Determines the number of pages displayed Vertically.
   
• Columns:-Determines the number of pages displayed Horizontally.
   
• Zoom:- Determines a value specifing how large the pages will appear.
  
  
  
  Here we are taking an example that how you can Print a document and check PrintPreview.
   
• Open a new project.
• Drag the two Buttons, PrintDocument, PrintDialog, PrintPreviewDialog control on form, the form will look like given below.
  
  
  
  
  
   
  
• Write the code given below.
  
     Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs)
          e.Graphics.DrawString(Label1.Text, Label1.Font, Brushes.Black, 100, 100)
          e.Graphics.PageUnit = GraphicsUnit.Inch
      End Sub
          'open the print dialog on Print Button click
      Private Sub btnPrint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrint.Click
          PrintDialog1.Document = PrintDocument1 'PrintDialog associate with PrintDocument.
          If PrintDialog1.ShowDialog() = DialogResult.OK Then
              PrintDocument1.Print()
          End If
      End Sub
          'open the print preview on PrintPreview Button click
      Private Sub btnPrintPreview_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrintPreview.Click
          PrintPreviewDialog1.Document = PrintDocument1 'PrintPreviewDialog associate with PrintDocument.
          PrintPreviewDialog1.ShowDialog() 'open the print preview
      End Sub

   Output:-