全部显示

UseDefaultPrinter 属性

返回或设置一个 Boolean 值，表示指定窗体或报表是否使用系统的默认打印机；如果窗体或报表使用默认打印机，该值设为 True。可读写。

expression   必需。返回“Applies To”列表中的一个对象的表达式。

说明

该属性在“设计”视图中可读写，但在其他视图中为只读。

当该属性设为 True 时，窗体或报表将默认打印机的设置继承其所有打印机设置。通过将其 Printer 属性指定为 Printer 对象来更改与窗体或报表相关的打印机时，会将 UseDefaultPrinter 属性设为 False。

示例

下面的示例用于检查是否指定窗体使用默认打印机；如果不是默认打印机，则询问用户是否应使用默认打印机。

Function CheckPrinter(frmTemp As Form) As Boolean

    If frmTemp.UseDefaultPrinter = False Then
        If MsgBox("Should this form use " _
                & "the default printer?", _
                vbYesNo) = vbYes Then
            frmTemp.UseDefaultPrinter = True
        End If
    End If

End Function