PaperSize 属性

适用对象

Printer 对象

返回或设置一个 AcPrintPaperSize 常量,表明打印时所用的纸张大小。可读/写。

AcPrintPaperSize 可以是下列 AcPrintPaperSize 常量之一。

acPRPS10x14

acPRPS11x17

acPRPSA3

acPRPSA4

acPRPSA4Small

acPRPSA5

acPRPSB4

acPRPSB5

acPRPSCSheet

acPRPSDSheet

acPRPSEnv10

acPRPSEnv11

acPRPSEnv12

acPRPSEnv14

acPRPSEnv9

acPRPSEnvB4

acPRPSEnvB5

acPRPSEnvB6

acPRPSEnvC3

acPRPSEnvC4

acPRPSEnvC5

acPRPSEnvC6

acPRPSEnvC65

acPRPSEnvDL

acPRPSEnvItaly

acPRPSEnvMonarch

acPRPSEnvPersonal

acPRPSESheet

acPRPSExecutive

acPRPSFanfoldLglGerman

acPRPSFanfoldStdGerman

acPRPSFanfoldUS

acPRPSFolio

acPRPSLedger

acPRPSLegal

acPRPSLetter

acPRPSLetterSmall

acPRPSNote

acPRPSQuarto

acPRPSStatement

acPRPSTabloid

acPRPSUser

表达式.PaperSize

表达式是必需的。返回“适用对象”列表中某个对象的表达式。

示例

以下示例为过程的 strFormname 参数中指定的窗体设置了各种打印机设置。

Sub SetPrinter(strFormname As String)
DoCmd.OpenForm FormName:=strFormname, _
view:=acDesign, datamode:=acFormEdit, _
windowmode:=acHidden
With Forms(form1).Printer
.TopMargin = 1440
.BottomMargin = 1440
.LeftMargin = 1440
.RightMargin = 1440
.ColumnSpacing = 360
.RowSpacing = 360
.ColorMode = acPRCMColor
.DataOnly = False
.DefaultSize = False
.ItemSizeHeight = 2880
.ItemSizeWidth = 2880
.ItemLayout = acPRVerticalColumnLayout
.ItemsAcross = 6
.Copies = 1
.Orientation = acPRORLandscape
.Duplex = acPRDPVertical
.PaperBin = acPRBNAuto
.PaperSize = acPRPSLetter
.PrintQuality = acPRPQMedium
End With
DoCmd.Close objecttype:=acForm, _
objectname:=strFormname, _
Save:=acSaveYes
End Sub
扩展你的技能
了解培训
抢先获得新功能
加入 Office 预览体验计划

此信息是否有帮助?

谢谢您的反馈!

谢谢你的反馈! 可能需要转接到 Office 支持专员。

×