vb打印机设置

如果是现在我有A、B两台打印机，A是当前系统默认使用的打印机（HP LaserJet 5000 Series PCL），我现在程序中有个表打印时想使用B机（hp LaserJet 1010），还不能改变系统的默认设定，该如何处理

我在打印表格时 用Printer.DeviceName = "hp LaserJet 1010"时运行正常 但是编译时报错（错误的参数号或无效属性值）请问什么原因

---

帮顶

---

前提是你得知道你要使用的打印机的名称
这样并不改变系统的默认打印机
VB code:

Dim p As Printer
For Each p In Printers

If p.DeviceName = "Foxit PDF Printer" Then
Set Printer = p
Exit For
End If

Next