Ισχύει για
Αντικείμενο 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