打印问题？

Question

我在VB中怎么检测打印机有没有安装呀，最好是代码？

Answer 1

msdn里面有原码
Printers 集合可用来查询可用的打印机，这样就可以为应用程序指定一台缺省打印机。例如也许要找出哪些可用打印机用了指定的打印驱动程序。下面的代码查找所有的可用打印机，定位在第一个将页码方向设置为纵向的打印机，然后将其设置为 Portrait。Dim X As Printer
For Each X In Printers
   If X.Orientation = vbPRORPortrait Then
      '设定为系统缺省打印机。
      Set Printer = X
      ' 终止查找打印机。
      Exit For
   End If
Next用 Set 语句指定 Printers 集合中的某一打印机为缺省打印机。前面的示例指定由对象变量 X 标识的打印机为应用程序的缺省打印机。