VB.Net Printdialog не показывает доступные принтеры

Question

При печати из Excel, Outlook и т. Д. Отображаются 3 принтера, когда я вызываю PrintDialog1.ShowDialog(), он показывает только принтер по умолчанию. Как я могу показать все доступные принтеры? Спасибо

Answer 1

Это должно получить список установленных принтеров, если они не отображаются с этим кодом, возможно, вам нужно обновить драйверы?

    Dim controller As New ServiceController("Spooler")
    If controller.Status = ServiceControllerStatus.Running Then
        'http://social.msdn.microsoft.com/Forums/en-US/vbgeneral/thread/fe615570-ce3e-419b-86fc-7f98aed71c8f
        For Each currentPrinter As String In System.Drawing.Printing.PrinterSettings.InstalledPrinters
            'now add the currentPrinter to a list ...                   
        Next
    End If