感谢您使用微软产品。

在Windows NT version 4.0, Windows 2000, or Windows XP平台下，在VB6.0中，调用CommonDialogbox的ShowPrint方法以后，Printer的一些属性例如Copies和Orientation不会改变，而在Windows 95, Windows 98, or Windows ME下工作正常，您可以通过以下方法来解决这个问题，如下例：
With CommonDialog1
     .ShowPrinter
     Printer.Copies = .Copies
     Printer.Orientation = .Orientation
     Debug.Print "Copies = " & CStr(Printer.Copies) & vbCrLf & "Orientation = " & CStr(Printer.Orientation)
End With

您可以参考以下文章了解更多信息：
PRB: CommonDialog Changes System Wide Printer Properties (Q198712)
http://support.microsoft.com/default.aspx?scid=kb;en-us;Q198712

微软全球技术中心 VB技术支持
本贴子以“现状”提供且没有任何担保，同时也没有授予任何权利。具体事项可参见使用条款(http://support.microsoft.com/directory/worldwide/zh-cn/community/terms_chs.asp)。

虽然这样可以解决Printer的几个属性，但与纸张相关的属性却无法获得，如paperSize等属性，都无法改变，参照MS网站上提供有API，也无法真正改变打印机的缺省属性，到底为什么呀？

另外，使用 Set Printer=...的方法甚至不能改变缺省的打印机，这VB还能不能在Win2k下工作呀