本示例显示活动打印机的名称。

MsgBox "The name of the active printer is " & _

Application.ActivePrinter