I have this example:
Private Sub Command2_Click()
Dim objPrint As Printer
CommonDialog1.Flags = cdlPDDisablePrintToFile
CommonDialog1.Copies = 3
CommonDialog1.PrinterDefault = True
CommonDialog1.ShowPrinter
'what's next??
MsgBox "The default printer is:" & Printer.DeviceName
End Sub
but I don't know how to print, I need to print a text box or just give me an example to print a messaje.
Thanx for your cooperation!
Private Sub Command2_Click()
Dim objPrint As Printer
CommonDialog1.Flags = cdlPDDisablePrintToFile
CommonDialog1.Copies = 3
CommonDialog1.PrinterDefault = True
CommonDialog1.ShowPrinter
'what's next??
MsgBox "The default printer is:" & Printer.DeviceName
End Sub
but I don't know how to print, I need to print a text box or just give me an example to print a messaje.
Thanx for your cooperation!