Свойство PaperBin

Отнася се за

Обект 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
Разширете уменията си в Office
Преглед на обучението
Получавайте първи новите функции
Присъединете се към участниците в Office Insider

Беше ли полезна тази информация?

Благодарим ви за обратната връзка!

Благодарим ви за вашата обратна връзка. Изглежда, че ще бъде полезно да ви свържем с един от нашите агенти по поддръжката на Office.

×