条形码扫描仪如何与程序连在一起
自己编一个入库的系统，想用条形码扫描仪直接扫入而不用手输入如何实现呀

[解决办法]
就是键盘输入后加入Enter
[解决办法]
可以自己置的志和束志。
束之後自加回
Private Sub Form_KeyPress(KeyAscii As Integer)
dim Myinput as string
Myinput=inputbox( "Input Data ", "Scan Data ")
if keyascii=126 then '~表示描器出的
keyascii=0 '去掉~
.....


end if


End Sub