Foxtable(狐表)用户栏目专家坐堂 → [求助]如何实现的连续扫码?


  共有2235人关注过本帖树形打印复制链接

主题:[求助]如何实现的连续扫码?

帅哥哟,离线,有人找我吗?
谢天钰
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:211 积分:3044 威望:0 精华:0 注册:2012/4/13 12:44:00
[求助]如何实现的连续扫码?  发帖心情 Post By:2017/6/24 20:44:00 [只看该作者]

我想在窗口中的文本框中扫码,自动添加到表的当前行,然后清空文本框文本,光标还留在文本框?请问如何写事件代码?

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/6/25 12:10:00 [只看该作者]

窗口keydown事件

 

If e.Keycode = 13 Then
    Dim nr As Row = Tables("表A").AddNew
    nr("第一列") = e.Sender.Text
    e.Sender.text = ""
    e.Sender.Select
    e.cancel = True
End If


 回到顶部