以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  连续输入的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=160945)

--  作者:gryy
--  发布时间:2021/2/27 10:35:00
--  连续输入的问题
一个  文本框,扫码条码,连续输入,当条码=20个字符,就自动回车,
在valuechanged 设置代码,自动回车不起作用呢?
If e.Sender.Text.Length =20  Then
    Dim nr As Row = Tables("表e").AddNew
    Dim t As String =  nr("第一列")
    nr("第一列") = e.Sender.Text
    e.Sender.text = ""
    e.Sender.Select
    e.cancel = True
    Sendkeys.Sendwait("{ENTER}")
End If

--  作者:有点蓝
--  发布时间:2021/2/27 10:55:00
--  
回车的目的是要做什么?