Gjelder for
Skriverobjekt
Returnerer eller angir en AcPrintPaperBin-konstant som viser hvilken papirskuff den angitte skriveren skal bruke. Lese/skrive.
AcPrintPaperBin kan være én av disse AcPrintPaperBin-konstantene. |
acPRBNAuto |
acPRBNCassette |
acPRBNEnvelope |
acPRBNEnvManual |
acPRBNFormSource |
acPRBNLargeCapacity |
acPRBNLargeFmt |
acPRBNLower |
acPRBNManual |
acPRBNMiddle |
acPRBNSmallFmt |
acPRBNTractor |
acPRBNUpper |
uttrykk.PaperBin
uttrykk Påkrevd. Et uttrykk som returnerer ett av objektene i Gjelder for-listen.
Eksempel
Det følgende eksemplet angir forskjellige skriverinnstillinger for skjemaet spesifisert i strFormname-argumentet for prosedyren.
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