我用过的扫描枪的输入是用的com输入,在VB里添加MSComm控件即可。视设备管理器里识别为com几就选com几。
站在用户的角度思考问题,与客户深入沟通,找到玉泉网站设计与玉泉网站推广的解决方案,凭借多年的经验,让设计与互联网技术结合,创造个性化、用户体验好的作品,建站类型包括:网站设计制作、网站设计、企业官网、英文网站、手机端网站、网站推广、空间域名、网页空间、企业邮箱。业务覆盖玉泉地区。
扫描的时候,MSComm控件有comEvReceive事件,可以作为触发事件的,比如控件名是MSComm1
那这个MSComm1_OnComm()里,如果有这个触发事件,就可以声明一个字符型来接受MSComm1.input
这个输入可能根据不同扫描枪不同要进行些处理以得到你需要的条码实值
当然条码枪具体给你什么你可以去Windows自带的Hyper Terminal里看到
有个了这个条码值,在你图里对应的第二个表里其他的Textbox或者label控件就可以写相应的Caption了,无非是if,case判断了
不加数据库连接的话就没那么复杂了
空口说白话也不行,以下是基于Motolora Symbol P370/470型对条码值的一些处理,直接写在OnComm里了,process_no就是看到这个号码做相应处理的判断,可以另起炉灶写一个到时候调用就是
Private Sub MSComm1_OnComm()
Dim st As String
If MSComm1.CommEvent = comEvReceive Then
st = MSComm1.Input
If st Chr(3) Then
st_all = st_all + st
Else
Txt_Pt.Text = Trim(Mid(st_all, InStr(st_all, Chr(2)) + 1, 10))
st_all = ""
Process_no
End If
End If
End Sub
以上只是com接收事件和取值的例子,判断不必参考的,关键无非是把接收值读入st,再对st_all这个全局变量赋值(不然你一会用那个条码值可没有个地方记录了)
非com输入恕在下暂时无能为力
这个要看扫描枪的通讯接口和通讯协议,以及接口程序是否支持VB.NET等。
不需要监控接口,扫描枪应该是直接扫描出数字的,直接用一个Textbox显示扫描结果就可以了
如果是usb扫描枪,是焦点在哪它就输入在哪,不能自动对应到相应的文本框
如果是串口扫描枪可以实现你的功能,在代码里判断相应的串口对应文本框
利用手机摄像头扫描识别条码,简化数据输入,可以扫描识别常见的一维码,二维码,识别解码迅速,准确。开放的API接口,不超过10句代码让你的项目集成条码扫描功能。
经过优化的扫描引擎,识别更迅速
完善的 API接口:
完全开放的API参数,直接引用DLL
完全集成了Camera的开发,直接从摄像头内存buffer扫描条码
C#,VB.NET直接调用,简化你的项目开发进度
C#,VB.NET范例
记不清,好像是 安徽天冠信息产业有限公司开发的 如果商业应用你可以去找他们。很成熟,我以前在别的公司用过。
我用的metrologio扫描枪
扫描枪工作流程 1.扫描条型码 2.编绎条型码 3.模拟键盘输入: 条型码字符 + 回车
可以看出,当出现回车时就代表输入结束,可以执行代码了
用keydown ,keyup 或者keypress 事件
下面用keypress举例:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then ‘回车键的asc键值为13
'省略要执行的代码
text1.text="" '清空文本框
'上面这个是最简单的,要想保留条型码只要删除上这行了
End If
End Sub
'我觉得还是清空文本框比较好,方便多次扫描
因为没有代码,所以不能确定是不是这样,能达到同样效果还有别的方法,基本上都差不多的,就不说了