適用對象
應用程式物件 |
Form 物件 |
Report 物件 |
傳回或設定代表目前系統上預設印表機的 Printer 物件。 讀/寫。
expression.Printer
運算式 必要。 傳回 [套用至] 清單中其中一個對象的表達式。
範例
以下範例將 Printers 物件集合中的第一個印表機設定為系統的預設印表機,然後報告其名稱、驅動程式資訊和連接埠資訊。
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