为什么选择的打印机无效？

当你设定完了打印机后是采用什么方式打印的？好像设定完之后只能采用Printer
对象的方法打印。
www.applevb.com

解决方案 »

  1.   

    当然是用Printer对象打印了。纸张大小的判断，页边距的设置等等都编写完成了，单独这一个问题无法解决。
      

  2.   

    我在我的机器上试，没有问题：
        Set Printer = Printers(0)
        Debug.Print Printer.PrintQuality
        Printer.NewPage
        Printer.PaintPicture Form1.Picture, 0, 0
        Printer.EndDoc我的默认打印机原来是1，执行上面的代码就会启动打印机0来打印。
    使用API函数GetDefaultPrinter可以获得默认打印机的名称。
      

  3.   

    To TechnoFantasy:
    你说的API函数GetDefaultPrinter在可以得到默认打印机，为什么在VB的API浏览器中找不到它的声明？在其它的WIN32 SDK帮助中也没有找到该函数的说明。到底有没有这个函数？如何声明？
      

  4.   

    这个问题也经解决。原因是在IDE环境中才会发生这种情况，编译后一切正常。不知大家是否遇到这类似情况。
      

  5.   

    我在IDE中没有遇到这个情况，可能可环境有关。
      

  6.   

    To TechnoFantasy:
    你还没有回答我GetDefaultPrinter这个函数到底有没有，怎么用？