Printer 属性

应用对象
Microsoft 365 专属 Access Access 2021 Access 2019 Access 2016

适用于

Application 对象
Form 对象
Report 对象

返回或设置一个 Printer 对象，该对象代表当前系统上的默认打印机。 可读/写。

表达式.Printer

表达 必填。 返回“适用范围”列表中的对象之一的表达式。

示例

以下示例使 打印机 集合中的第一台打印机成为系统的默认打印机，然后报告其名称、驱动程序信息和端口信息。

Dim prtDefault As Printer
Set Application.Printer = Application.Printers(0)
Set prtDefault = Application.Printer
With prtDefault
    MsgBox "Device name: " & .DeviceName & vbCr _
        & "Driver name: " & .DriverName & vbCr _
        & "Port: " & .Port
End With