cargar impresoras de windows en combo

[guillebomtrasmiti]

bueno, he encontrado este código que imprime la que yo tengo indiferentemente de la que tiene windows como predeterminada?, pero saca un panel que indica el número de documentos que no quiero que aparezca...sabes como quitarlo?¿?

Dim pd As New PrintDocument()

With pd.PrinterSettings
' Especifico el nombre de la impresora
' por donde deseo imprimir.
'
.PrinterName = TextIMPGes.Text
' Establezco el número de copias que se imprimirán
.Copies = 1
' Rango de páginas que se imprimirán
.PrintRange = PrintRange.AllPages
If .IsValid Then
pd.Print()
Else
MessageBox.Show("La impresora no es válida.", "Aviso GesDreamtPos")
End If
End With

GRACIASSSSSSSSSSSSSS