求VB打开POS钱箱的问题

以前用并口的打印机（打印机端口为LPT1)，钱箱连接上打印机后，用以下命令就可以打开钱箱：

Open "LPT1" For Output As #1
    Print #1, Chr(27) + "p" + Chr(0) + Chr(60) + Chr(255)
Close #1

现在换了USB接口的打印机，请问怎样打开钱箱。请高手指点，谢谢！ 研究一下怎么向USB端口发送命令 用print对象打印 Open "USB1" For Output As #1 
Print #1, Chr(27) + "p" + Chr(0) + Chr(60) + Chr(255) 
Close #1




一开玩笑的，友情Up...........
顶起~~~~~~~~ 貌似有个硬件设备可以吧lpt转到usb hao 

补充：VB ,  控件