請問條碼掃描后如何進(jìn)入下一條新數(shù)據(jù)？謝謝您的回復(fù)

luchunli

請問如何實條碼掃描后自動進(jìn)入下一字段或者下一條記錄。條碼掃描槍已經(jīng)設(shè)置成回車了。謝謝您的回復(fù).

JosephTan

這個是我的jump模塊,我不是用條碼槍掃的,我是用攝像頭掃的.
Sub Jump()


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

End Sub

Henry D. Sy

設(shè)置為回車，還不行嗎
那用sendkeys試試

JosephTan

這個是我攝像頭掃描條碼用的跳轉(zhuǎn)程序
Sub Jump()


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

luchunli

斑主能幫我看看我的例子嗎？您說的那個我不會用啊。謝謝！