Attiecas uz
Printera objekts
Atgriež vai iestata AcPrintPaperBin konstanti, kas norāda, kura papīra tekne jāizmanto norādītajam printerim. Lasāms/rakstāms.
|
AcPrintPaperBin var būt viena no šīm AcPrintPaperBin konstantēm. |
|
acPRBNAuto |
|
acPRBNCassette |
|
acPRBNEnvelope |
|
acPRBNEnvManual |
|
acPRBNFormSource |
|
acPRBNLargeCapacity |
|
acPRBNLargeFmt |
|
acPRBNLower |
|
acPRBNManual |
|
acPRBNMiddle |
|
acPRBNSmallFmt |
|
acPRBNTractor |
|
acPRBNUpper |
izteiksme.PaperBin
expression Obligāti. Izteiksme, kas atgriež vienu no objektiem sarakstā Attiecas uz.
Piemērs
Šajā piemērā norādīti dažādi printera iestatījumi procedūras argumentā strFormname norādītajā formā.
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
