Combobox con nome stampanti installate

martedì 01 luglio 2008 - 09.23

aleroot Profilo | Junior Member

Vorrei importare in una combobox il nome delle stampanti installate sul sistema ...
Per Visual Basic 6 usavo il seguente codice :
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 :

Con VB 2008 non funziona, come posso fare per farlo con VB 2008 Express Edition?

Fantazma Profilo | Junior Member

Io risolvo così:

Dim pkInstalledPrinters As String For i As Integer = 0 To PrinterSettings.InstalledPrinters.Count - 1 pkInstalledPrinters = PrinterSettings.InstalledPrinters.Item(i) CmbPrinters.Items.Add(pkInstalledPrinters) Next

aleroot Profilo | Junior Member

mi da Nome
Nome 'PrinterSettings' non dichiarato
Nome 'PrinterSettings' non dichiarato
Nome 'CmbPrinters' non dichiarato

aleroot Profilo | Junior Member

mi da :

Nome 'PrinterSettings' non dichiarato
Nome 'PrinterSettings' non dichiarato
Nome 'CmbPrinters' non dichiarato

Fantazma Profilo | Junior Member

Basta inserire

Imports System.Drawing.Printing

aleroot Profilo | Junior Member

Io ho messo cosi :
Il codice sorgente non è stato renderizzato qui
perchè non c'è sufficiente spazio.
Clicca qui per visualizzarlo in una nuova finestra

Ma da errore :

Nome PrinterSettings non dichiarato ...

Cosa può essere?

Fantazma Profilo | Junior Member

Tutti i comandi di Imports vanno inseriti all'inizio della classe e mai all'interno di una funzione.
Quindi ti basta spostare Imports System.Drawing.Printing come prima riga assoluta del tuo form

aleroot Profilo | Junior Member

Grazie mille e scusa l'ignoranza...

Fantazma Profilo | Junior Member

...e di che figurati!!!

Se puoi accetta la soluzione così da chiudere il post!!!

aleroot Profilo | Junior Member

Senti un'altra piccola domanda, vorrei che quando seleziono una stampante mi copia il nome della stampante in una textbox ad esempio textbox2.

sai come posso fare ?

Grazie

Fantazma Profilo | Junior Member

Basta che nell'evento SelectedIndexChanged della combobox dove hai la lista delle stampanti inerisci questo codice:

textbox1.text=CStr(ComboBoxListaStampanti.SelectedItem)

Ciao!!!
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !
Copyright © dotNetHell.it 2002-2023
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5