DefaultSize 屬性

此頁沒有內(nèi)容條目
內(nèi)容

如果“設(shè)計(jì)”視圖中的主體節(jié)的大小用于打印,則為 True。否則,使用 ItemSizeHeightItemSizeWidth 屬性的值。Boolean 型,可讀寫。

expression.DefaultSize

expression     必需。返回“應(yīng)用于”列表中的一個(gè)對象的表達(dá)式。

說明

如果該屬性為 True,則忽略 ItemSizeHeightItemSizeWidth 屬性。

示例

下面的示例為過程的 strFormname 參數(shù)中指定的窗體設(shè)置各種打印機(jī)設(shè)置。

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