求教,如何在VB中使用打印机,是用什么控件吗?急用,谢谢指导:)

Question

printer对象,为当前默认打印机

Answer 1

使用 Printer 对象可以实现与系统打印机的通讯（最初是缺省系统打印机）。用 Printers 集合可获取有关系统上所有可用打印机的信息。语法PrinterPrinters(index)index 所在处表示从 0 到 Printers.Count-1 之间的整数。说明用图形方法在 Printer 对象上绘制文本和图形。一旦 Printer 对象中含有将要打印的输出信息，可用 EndDoc 方法直接将输出信息送到应用程序的缺省打印机上。如果要打印这些信息，应该检查和可能还要修正窗体的布局。例如，如果用 PrintForm 方法打印窗体，则到页底图形图象可能被剪切，而文本则被移到下一页。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 标识的打印机为应用程序的缺省打印机。注意 如果用 Printers 集合来确定某一特定打印机，如 Printers(3)，则只能访问只读属性。如果想访问个别打印机的可读写属性，那么首先要使那个打印机成为应用程序的缺省打印机。