测试了一下,并不会修改默认打印机的。
如果你要修改默认打印机,可以这样写代码
Dim obj As object = CreateObject("WScript.Network")obj.SetDefaultPrinter("打印机名")