Noms des ports et des imprimantes
J'espère que les codes suivants t'ouvriront la piste que tu cherches :
'' Liste des ports série disponibles
Code:
1 2 3
| For Each sp As String In My.Computer.Ports.SerialPortNames
LBTest.Items.Add(sp) 'Ajout des noms de ports dans la Listbox LBTest
Next |
'' Liste des imprimantes disponibles
Code:
1 2 3 4
| Dim PRN As New Printing.PrintDocument
For Each sp As String In PRN.PrinterSettings.InstalledPrinters
LBTest.Items.Add(sp) 'Ajout des noms des imprimantes installées dans la Listbox LBTest
Next |
:-)