你没有把网络打印机设置成默认打印机吧？
Dim obj As object = CreateObject("WScript.Network")obj.SetDefaultPrinter(drp("打印机"))
加好友 
发短信
Post By：2017/6/6 10:16:00 [只看该作者]
