这么调用的
With dlgCommonDialog
.CancelError = True
.DialogTitle = "打印设置"
.Flags = cdlPDPrintSetup
.ShowPrinter
End With
With dlgCommonDialog
.CancelError = True
.DialogTitle = "打印设置"
.Flags = cdlPDPrintSetup
.ShowPrinter
End With
或许对你有用。
http://www.csdn.net/expert/topic/660/660318.xml?temp=.4891016
主 题: 如何在程序中设置打印机的方向
作 者: jswxcathay596200 ()
等 级:
信 誉 值: 100
所属论坛: Visual Basic
问题点数: 20
回复次数: 8
发表时间: 2002-4-19 14:35:57
'**********在屏幕中调用如下**********
' ResetPrinterOrientation Me '设为默认值
' ChngPrinterOrientationPortrait Me '设置为纵向
' ChngPrinterOrientationLandscape Me '设置为横向