Visual Basic 6.0 与 Windows API 讲座

Q & A


05/26 如何设定打印机的打印方向(水平或垂直)?

如何设定打印机的打印方向(水平或垂直)?

VB 的 Printer 对象虽然提供有 Orientation 属性可供我们读取或设定打印机的打印方向, 但实质上, 设定的功能却是无效的。如何设定打印机的打印方向呢?

首先您可以到 http://support.microsoft.com/download/support/mslfiles/PageSet.exe 下载微软公司所提供的文档(此一信息由微软 Tony Tai 提供,特此致谢), 然后将 PageSet.exe 解压缩(执行后即可自动解压缩), 解压缩之后, 阅读其 Readme.txt, 即可得知设定打印机打印方向的方法。

以 PageSet/Readme.txt 的说明来看, 是将可以设定打印方向的方法建立成一个 PageSet.dll(它是一个 ActiveX DLL), 但由于其中也附有原始程式码, 所以笔者偏好直接调用 Windows API,方法如下:

1. 增添 PageSet.bas 到您的专案中。
2. 如何要将打印机设定成水平方向,则调用的语句是:

SetOrientation DMDUP_SIMPLEX, 2

3. 如何要将打印机设定成垂直方向,则调用的语句是:

SetOrientation DMDUP_SIMPLEX, 2