在运行时如何获得打印机当前选定的纸张型号及尺寸.txt

VB技巧问答10000例 VB技巧问答10000例

你可以使用Printer对象的PaperSize获得纸张型号（在帮助中有更详细的说明），使用Printer对象的Height 和 Width属性获得纸张大小。 
    Printer对象表示当前系统默认打印机，如果你想知道它在Printers中的序号，可以使用下面的代码： 
     For i = 0 To Printers.Count - 1 
     If Printers(i).DeviceName = Printer.DeviceName Then 
     Print i 
     End If 
     Next 
<END>