Dim prn As Printer ' Scelta della stampante: Combo1.Clear For Each prn In Printers Combo1.AddItem prn.DeviceName Next Combo1.Text = "Seleziona la stampante" ' Visualizza la stampante predefinita :
Dim pkInstalledPrinters As String For i As Integer = 0 To PrinterSettings.InstalledPrinters.Count - 1 pkInstalledPrinters = PrinterSettings.InstalledPrinters.Item(i) CmbPrinters.Items.Add(pkInstalledPrinters) Next
Il codice sorgente non è stato renderizzato quiperchè non c'è sufficiente spazio.Clicca qui per visualizzarlo in una nuova finestra