PrintQuality Property

Microsoft Access Visual Basic

constant indicating the resolution at which the specified printer should print jobs. Read/write.

AcPrintObjQuality can be one of these AcPrintObjQuality constants.
acPRPQDraft
acPRPQHigh
acPRPQLow
acPRPQMedium

expression.PrintQuality

expression    Required. An expression that returns one of the objects in the Applies To list.

Example

The following example sets a variety of printer settings for the form specified in the strFormname argument of the procedure.

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