Alle installierten Drucker ermitteln (.NET) Hier wird gezeigt, wie sich alle im System installierten Drucker ermitteln und in sortierter Reihenfolge in einer ComboBox zur Auswahl anzeigen lassen.
Autor:   Dieter Otter	Bewertung:     [ Jetzt bewerten ]	Views:  28.813
https://www.tools4vb.com	System:  WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 6 Bewertung insgesamt: gut Durchschnittliche Bewertung: 4.0 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Mit nachfolgendem Code lassen sich alle im System installierten Drucker ermitteln und zur Auswahl in einer ComboBox anzeigen:

Imports System.Drawing.Printing
...

' alle installierten Drucker ermitteln und 
' in einer ComboBox zur Auswahl anzeigen
For Each sPrinter As String In PrinterSettings.InstalledPrinters
  ComboBox1.Items.Add(sPrinter)
Next 

Soll die Auswahl der Drucker alphabetisch sortiert werden, können Sie ComboBox-Eigenschaft "Sorted" auf True festlegen oder alternativ die Drucker zunächst in ein ArrayList-Objekt einlesen, dieses sortieren und anschließend "auswerten".

' alle installierten Drucker ermitteln und 
' in in ein ArrayList-Objekt speichern
Dim sPrinters As New ArrayList
For Each sPrinter As String In PrinterSettings.InstalledPrinters
  sPrinters.Add(sPrinter)
Next 
 
' Array sortieren
sPrinters.Sort()
 
' jetzt alle Drucker in sortierter Reihenfolge in einer
' ComboBox zur Auswahl anbieten
For i As Integer = 0 To sPrinters.Count - 1
  ComboBox1.Items.Add(sPrinters(i))
Next