適用對象
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 |
expression.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