Receiving an 'InvalidPrinterException' - "No Printers are installed." Error

Question

But I have several printers installed. I think the code is pretty standard...

    Dim printDocument As New System.Drawing.Printing.PrintDocument
    Dim pageSetupDialog As New System.Windows.Forms.PageSetupDialog
    pageSetupDialog.Document = printDocument
    pageSetupDialog.ShowDialog()

Did I miss something? I can even enumerate through my printers in code (I've got five of them). One is set as the system default. What's going on?

Answer 1

Did you try assigning PageSettings and PrinterSettings on your dialog before calling ShowDialog() ?

pageSetupDialog .PageSettings = _
    New System.Drawing.Printing.PageSettings

pageSetupDialog .PrinterSettings = _
    New System.Drawing.Printing.PrinterSettings

Source.

EDIT: This page about the exception says:

Make sure a default printer has been installed.

Do you have one installed?