条形码扫描仪如何与程序连在一起
自己编一个入库的系统，想用条形码扫描仪直接扫入而不用手输入如何实现呀
[解决办法]
就是键盘输入后加入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
