VB.Net获取打印机列表

For Each sPrint As String In PrinterSettings.InstalledPrinters
    listBox1.Items.Add(sPrint)
Next