Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Gillard
Dim printers As System.Drawing.Printing.PrinterSettings.StringCollection Dim x As Int32 Dim str As String = String.Empty printers = System.Drawing.Printing.PrinterSettings.InstalledPrinters() For x = 0 To printers.Count - 1 str = str & printers.Item(x) & vbCrLf Next x MessageBox.Show(str)
"Annie L." wrote in message news:
Comment faire pour avoir la liste des imprimantes dans mon ordinateur ou sur le réseau ?
My.Computer.Printers = n'existe pas ?????
Merci de vos réponses!
Dim printers As
System.Drawing.Printing.PrinterSettings.StringCollection
Dim x As Int32
Dim str As String = String.Empty
printers =
System.Drawing.Printing.PrinterSettings.InstalledPrinters()
For x = 0 To printers.Count - 1
str = str & printers.Item(x) & vbCrLf
Next x
MessageBox.Show(str)
"Annie L." <AnnieL@discussions.microsoft.com> wrote in message
news:B029AFED-5377-4D40-B352-A63BFCCD097A@microsoft.com...
Comment faire pour avoir la liste des imprimantes dans mon ordinateur ou
sur
le réseau ?
Dim printers As System.Drawing.Printing.PrinterSettings.StringCollection Dim x As Int32 Dim str As String = String.Empty printers = System.Drawing.Printing.PrinterSettings.InstalledPrinters() For x = 0 To printers.Count - 1 str = str & printers.Item(x) & vbCrLf Next x MessageBox.Show(str)
"Annie L." wrote in message news:
Comment faire pour avoir la liste des imprimantes dans mon ordinateur ou sur le réseau ?
My.Computer.Printers = n'existe pas ?????
Merci de vos réponses!
Annie L.
Ce que j'ai trouvé ressemble à ton exemple :
Imports System.Drawing.Printing
For i = 0 To PrinterSettings.InstalledPrinters.Count - 1 comboBox.Items.Add(PrinterSettings.InstalledPrinters.Item(i) Next
Merci quand même, je garde ton exemple!
"Gillard" wrote:
Dim printers As System.Drawing.Printing.PrinterSettings.StringCollection Dim x As Int32 Dim str As String = String.Empty printers = System.Drawing.Printing.PrinterSettings.InstalledPrinters() For x = 0 To printers.Count - 1 str = str & printers.Item(x) & vbCrLf Next x MessageBox.Show(str)
"Annie L." wrote in message news: > Comment faire pour avoir la liste des imprimantes dans mon ordinateur ou > sur > le réseau ? > > My.Computer.Printers = n'existe pas ????? > > Merci de vos réponses!
Ce que j'ai trouvé ressemble à ton exemple :
Imports System.Drawing.Printing
For i = 0 To PrinterSettings.InstalledPrinters.Count - 1
comboBox.Items.Add(PrinterSettings.InstalledPrinters.Item(i)
Next
Merci quand même, je garde ton exemple!
"Gillard" wrote:
Dim printers As
System.Drawing.Printing.PrinterSettings.StringCollection
Dim x As Int32
Dim str As String = String.Empty
printers =
System.Drawing.Printing.PrinterSettings.InstalledPrinters()
For x = 0 To printers.Count - 1
str = str & printers.Item(x) & vbCrLf
Next x
MessageBox.Show(str)
"Annie L." <AnnieL@discussions.microsoft.com> wrote in message
news:B029AFED-5377-4D40-B352-A63BFCCD097A@microsoft.com...
> Comment faire pour avoir la liste des imprimantes dans mon ordinateur ou
> sur
> le réseau ?
>
> My.Computer.Printers = n'existe pas ?????
>
> Merci de vos réponses!
For i = 0 To PrinterSettings.InstalledPrinters.Count - 1 comboBox.Items.Add(PrinterSettings.InstalledPrinters.Item(i) Next
Merci quand même, je garde ton exemple!
"Gillard" wrote:
Dim printers As System.Drawing.Printing.PrinterSettings.StringCollection Dim x As Int32 Dim str As String = String.Empty printers = System.Drawing.Printing.PrinterSettings.InstalledPrinters() For x = 0 To printers.Count - 1 str = str & printers.Item(x) & vbCrLf Next x MessageBox.Show(str)
"Annie L." wrote in message news: > Comment faire pour avoir la liste des imprimantes dans mon ordinateur ou > sur > le réseau ? > > My.Computer.Printers = n'existe pas ????? > > Merci de vos réponses!
Gillard
c'est en effet blanc bonnet et bonnet blanc :-)
"Annie L." wrote in message news:
Ce que j'ai trouvé ressemble à ton exemple :
Imports System.Drawing.Printing
For i = 0 To PrinterSettings.InstalledPrinters.Count - 1 comboBox.Items.Add(PrinterSettings.InstalledPrinters.Item(i) Next
Merci quand même, je garde ton exemple!
"Gillard" wrote:
Dim printers As System.Drawing.Printing.PrinterSettings.StringCollection Dim x As Int32 Dim str As String = String.Empty printers >> System.Drawing.Printing.PrinterSettings.InstalledPrinters() For x = 0 To printers.Count - 1 str = str & printers.Item(x) & vbCrLf Next x MessageBox.Show(str)
"Annie L." wrote in message news: > Comment faire pour avoir la liste des imprimantes dans mon ordinateur > ou > sur > le réseau ? > > My.Computer.Printers = n'existe pas ????? > > Merci de vos réponses!
c'est en effet blanc bonnet et bonnet blanc :-)
"Annie L." <AnnieL@discussions.microsoft.com> wrote in message
news:8788C4CF-F574-4151-B734-5AA4CE5D3411@microsoft.com...
Ce que j'ai trouvé ressemble à ton exemple :
Imports System.Drawing.Printing
For i = 0 To PrinterSettings.InstalledPrinters.Count - 1
comboBox.Items.Add(PrinterSettings.InstalledPrinters.Item(i)
Next
Merci quand même, je garde ton exemple!
"Gillard" wrote:
Dim printers As
System.Drawing.Printing.PrinterSettings.StringCollection
Dim x As Int32
Dim str As String = String.Empty
printers >> System.Drawing.Printing.PrinterSettings.InstalledPrinters()
For x = 0 To printers.Count - 1
str = str & printers.Item(x) & vbCrLf
Next x
MessageBox.Show(str)
"Annie L." <AnnieL@discussions.microsoft.com> wrote in message
news:B029AFED-5377-4D40-B352-A63BFCCD097A@microsoft.com...
> Comment faire pour avoir la liste des imprimantes dans mon ordinateur
> ou
> sur
> le réseau ?
>
> My.Computer.Printers = n'existe pas ?????
>
> Merci de vos réponses!
For i = 0 To PrinterSettings.InstalledPrinters.Count - 1 comboBox.Items.Add(PrinterSettings.InstalledPrinters.Item(i) Next
Merci quand même, je garde ton exemple!
"Gillard" wrote:
Dim printers As System.Drawing.Printing.PrinterSettings.StringCollection Dim x As Int32 Dim str As String = String.Empty printers >> System.Drawing.Printing.PrinterSettings.InstalledPrinters() For x = 0 To printers.Count - 1 str = str & printers.Item(x) & vbCrLf Next x MessageBox.Show(str)
"Annie L." wrote in message news: > Comment faire pour avoir la liste des imprimantes dans mon ordinateur > ou > sur > le réseau ? > > My.Computer.Printers = n'existe pas ????? > > Merci de vos réponses!
