นำไปใช้กับ
|
วัตถุ 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
