Combobox con nome stampanti installate

martedì 01 luglio 2008 - 09.23

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

aleroot Profilo | Junior Member

96 messaggi | Data Invio: mar 1 lug 2008 - 09:23

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

95 messaggi | Data Invio: mar 1 lug 2008 - 09:49

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

96 messaggi | Data Invio: mar 1 lug 2008 - 11:42

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

aleroot Profilo | Junior Member

96 messaggi | Data Invio: mar 1 lug 2008 - 11:52

mi da :

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

Fantazma Profilo | Junior Member

95 messaggi | Data Invio: mar 1 lug 2008 - 12:27

Basta inserire

Imports System.Drawing.Printing

aleroot Profilo | Junior Member

96 messaggi | Data Invio: mar 1 lug 2008 - 12:33

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

95 messaggi | Data Invio: mar 1 lug 2008 - 12:47

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

96 messaggi | Data Invio: mar 1 lug 2008 - 15:37

Grazie mille e scusa l'ignoranza...

Fantazma Profilo | Junior Member

95 messaggi | Data Invio: mar 1 lug 2008 - 16:12

...e di che figurati!!!

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

aleroot Profilo | Junior Member

96 messaggi | Data Invio: mar 1 lug 2008 - 16:48

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

95 messaggi | Data Invio: mar 1 lug 2008 - 18:09

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

textbox1.text=CStr(ComboBoxListaStampanti.SelectedItem)

Ciao!!!

Torna su

Stanze Forum

Elenco Threads

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 !