You can use the print dialog to allow the user to select printer settings, which your application can then use to print. Below are the most common parameters you will need to set before displaying the Print Dialog Box.
| Parameter | Changes... |
| DialogTitle | the Title displayed in the Dialog Box |
| Printer Default | whether to use the default printer |
| Flags | custom settings such as print selection only |
| CancelError | whether an error occurs when the dialog box is cancelled. |
The following code displays a print dialog, with page numbers disabled, and then prints the text in RichTextBox1. It also returns the selected printer
CommonDialog1.PrinterDefault = True
CommonDialog1.CancelError = True
' Set flags - no page numbers, return the selected printer
CommonDialog1.Flags = cdlPDReturnDC + cdlPDNoPageNums
If RichTextBox1.SelLength = 0 Then
CommonDialog1.Flags = CommonDialog1.Flags + cdlPDAllPages
Else
CommonDialog1.Flags = CommonDialog1.Flags + cdlPDSelection
End If
' Enables error handling to catch cancel error
On Error Resume Next
' display the print dialog box
CommonDialog1.ShowPrinter
If Err Then
' This code runs if the dialog was cancelled
Msgbox "Dialog Cancelled"
Exit Sub
End If
' Prints the contents of RichTextBox
RichTextBox1.SelPrint (Printer.hDC)
Comments