请问条码扫描后如何进入下一条新数据？谢谢您的回复

luchunli · 发表于 2012-2-13 14:09:00

请问如何实条码扫描后自动进入下一字段或者下一条记录。条码扫描枪已经设置成回车了。谢谢您的回复.

JosephTan · 发表于 2012-2-13 14:37:14

这个是我的jump模块,我不是用条码枪扫的,我是用摄像头扫的.
Sub Jump()

If strBarcodes = "" Then
Exit Sub
Else
Form_发票.Combo51 = strBarcodes
'strBarcodes = ""
Form_发票.Combo51.SetFocus
DoEvents
SendKeys "^x", True
DoEvents
SendKeys "^v", True
DoEvents
SendKeys "{ENTER}", True
DoEvents
End If

End Sub

Henry D. Sy · 发表于 2012-2-13 15:03:17

设置为回车，还不行吗
那用sendkeys试试

JosephTan · 发表于 2012-2-13 15:08:49

这个是我摄像头扫描条码用的跳转程序
Sub Jump()

If strBarcodes = "" Then
Exit Sub
Else
Form_发票.Combo51 = strBarcodes
'strBarcodes = ""
Form_发票.Combo51.SetFocus
DoEvents
SendKeys "^x", True
DoEvents
SendKeys "^v", True
DoEvents
SendKeys "{ENTER}", True
DoEvents
End If
End Sub

luchunli · 发表于 2012-2-13 15:25:34

斑主能帮我看看我的例子吗？您说的那个我不会用啊。谢谢！

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[窗体] 请问条码扫描后如何进入下一条新数据？谢谢您的回复

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)