For Each strprinter As String In System.Drawing.Printing.PrinterSettings.InstalledPrinters ComboBox1.Items.Add(strprinter) Next