VB中如何打开USB端口

[vesicle]

我对VB不熟,但因工作需要修改以前的VB代码,其中的打印设备由并口换成了USB口
open "LPT1:" for output as

要如何修改才能打开USB,请各位高人帮帮忙~~~

[用户 昵称]

vc访问usb都需要一些ddk之类的库，VB没用过，

http://zhidao.baidu.com/question/37913144.html?fr=qrl&fr2=query

[vesicle]

改成PNR不行.

[vesicle]

楼上那个链接里,VB爱好乐园网站全都打不开,不过还是谢谢了

[东方之珠]

虚拟打印机端口:
端口号:USB001
描述:Virtual Printer port for USB

[Tiger_Zhao]

如果已经设为默认打印机，用 PRN 代替 LTP1 试试。

[白夜]

可以通过修改BIOS设置 或修改注册表来打开USB !试试看 ！至于vb就搞不太清楚了！

[Tiger_Zhao]

[Quote=引用 4 楼 vesicle 的回复:]
改成PNR不行.
[/Quote]
那就不用文件句柄，直接改用 Printer 对象输出

Printer.Print "Hello"
Printer.Print ...
Printer.EndDoc

[chinasdytyhb]

我也困惑中 我程序中也用到了usb001端口
调用下面这个语句后 在d盘就多了个usb001这个文件 用记事本打开后 里面就写着 p >


Open "usb001" For Output As #1

高手怎么解决的还请留言啊

[chinasdytyhb]

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

我的pos58热敏打印机接在 usb001这个端口上，
运行程序后，钱箱没有弹开，可是在d盘却多了个usb001的文件

请教高手 怎么才能通过语句打开钱箱

[chinasdytyhb]

难道就没有解决方法了吗？
usb口的pos打印机就没法开钱箱了吗？

[daveice]

同问同问！！！