本示例显示活动打印机的名称。
MsgBox "The name of the active printer is " & _
Application.ActivePrinter