นำไปใช้กับ
วัตถุ Printer
ส่งกลับหรือตั้งค่า ค่าคงที่ AcPrintPaperBin ที่ระบุว่าถังกระดาษใดที่เครื่องพิมพ์ควรใช้ อ่าน/เขียน
AcPrintPaperBin สามารถเป็นหนึ่งในค่าคงที่ AcPrintPaperBin เหล่านี้ได้ |
acPRBNAuto |
acPRBNCassette |
acPRBNEnvelope |
acPRBNEnvManual |
acPRBNFormSource |
acPRBNLargeCapacity |
acPRBNLargeFmt |
acPRBNLower |
acPRBNManual |
acPRBNMiddle |
acPRBNSmallFmt |
acPRBNTractor |
acPRBNUpper |
นิพจน์.PaperBin
นิพจน์ จำเป็น นิพจน์ที่ส่งกลับวัตถุใดวัตถุหนึ่งในรายการ นําไปใช้กับ
ตัวอย่าง
ตัวอย่างต่อไปนี้ตั้งการตั้งค่าเครื่องพิมพ์ต่างๆ สำหรับฟอร์มที่ระบุในอาร์กิวเมนต์ 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