Foxtable(狐表)用户栏目专家坐堂 → [求助] foxtable是否支持扫码出入库管理的开发


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

主题:[求助] foxtable是否支持扫码出入库管理的开发

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


加好友 发短信
等级:婴狐 帖子:8 积分:135 威望:0 精华:0 注册:2015/10/26 13:54:00
[求助] foxtable是否支持扫码出入库管理的开发  发帖心情 Post By:2016/3/26 10:52:00 [只看该作者]

foxtable是否支持扫码出入库管理的开发?

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


加好友 发短信
等级:九尾狐 帖子:2609 积分:16926 威望:0 精华:11 注册:2011/9/20 16:13:00
  发帖心情 Post By:2016/3/26 10:52:00 [只看该作者]

必须的

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


加好友 发短信
等级:婴狐 帖子:8 积分:135 威望:0 精华:0 注册:2015/10/26 13:54:00
  发帖心情 Post By:2016/3/26 10:57:00 [只看该作者]

具体有扫码案例吗?

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/3/26 11:35:00 [只看该作者]

扫描获得条码,根据条码进行条件查询然后操作

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/27 12:12:00 [只看该作者]

以下是引用x26247321在2016/3/26 10:57:00的发言:
具体有扫码案例吗?

 

扫描实际就是快速的键盘输入。

 

你把焦点移动到文本框里,然后扫描,编写keydown事件

 

If e.KeyCode = 13 Then
    msgbox(e.Sender.Text)
    e.cancel = True
    e.Sender.SelectAll   
End If


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


加好友 发短信
等级:幼狐 帖子:118 积分:1507 威望:0 精华:0 注册:2016/3/20 12:55:00
  发帖心情 Post By:2016/3/27 13:44:00 [只看该作者]

楼主的需求和我的一样啊


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/27 14:15:00 [只看该作者]

看5楼,不懂的地方,重新发帖提问题。

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


加好友 发短信
等级:四尾狐 帖子:977 积分:6835 威望:0 精华:0 注册:2012/4/2 21:49:00
  发帖心情 Post By:2016/4/6 11:17:00 [只看该作者]

sender不是keyEventargs的成员

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/6 11:22:00 [只看该作者]

以下是引用shenyl0211在2016/4/6 11:17:00的发言:
sender不是keyEventargs的成员

 

如果你要弄到表里面,你要去编写 KeyDownEdit 事件

 

If e.Col.name = "第一列" Then
    If e.KeyCode = 13 Then
        msgbox(e.Text)
    End If
End If

 


 回到顶部