Áp dụng cho
| Đối tượng Application |
|---|
| Đối tượng Form |
| Đối tượng Report |
Trả về hoặc đặt đối tượng Printer thể hiện máy in mặc định trên hệ thống hiện tại. Đọc/ghi.
expression.Printer
Expression Yêu cầu. Một biểu thức trả về một trong các đối tượng trong danh sách Áp dụng Cho.
Ví dụ
Ví dụ sau đây biến máy in đầu tiên trong tuyển tập Máy in trở thành máy in mặc định cho hệ thống, sau đó báo cáo tên máy in, thông tin trình điều khiển và thông tin cổng.
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