MyException - 我的异常网
当前位置:我的异常网» VB » 条形码扫描仪怎么与程序连在一起

条形码扫描仪怎么与程序连在一起

www.MyException.Cn  网友分享于:2013-12-29  浏览:112次
条形码扫描仪如何与程序连在一起
自己编一个入库的系统,想用条形码扫描仪直接扫入而不用手输入如何实现呀

------解决方案--------------------
就是键盘输入后加入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

文章评论

软件开发程序错误异常ExceptionCopyright © 2009-2015 MyException 版权所有