Foxtable(狐表)用户栏目专家坐堂 → 禁掉空格键


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

主题:禁掉空格键

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


加好友 发短信
等级:三尾狐 帖子:659 积分:4686 威望:0 精华:0 注册:2013/6/11 17:51:00
禁掉空格键  发帖心情 Post By:2014/1/4 16:27:00 [只看该作者]

e.keychar=“ ”?
Char.IsWhiteSpace(e.KeyChar)

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/1/4 16:34:00 [只看该作者]

e.KeyChar 输出到一个文本框看一下不就知道了.

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


加好友 发短信
等级:三尾狐 帖子:659 积分:4686 威望:0 精华:0 注册:2013/6/11 17:51:00
  发帖心情 Post By:2014/1/4 16:39:00 [只看该作者]

我用剪切板得到的是一个" "空格符号,我用
e.keychar=" ”没有触发
[此贴子已经被作者于2014-1-4 16:38:45编辑过]

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/1/4 16:39:00 [只看该作者]

If e.KeyChar=Convert.ToChar(32) Then   这样

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


加好友 发短信
等级:三尾狐 帖子:659 积分:4686 威望:0 精华:0 注册:2013/6/11 17:51:00
  发帖心情 Post By:2014/1/4 16:45:00 [只看该作者]

这样还可以打空格的
我本来是想限制该文本框只能输入小数点 "."和数字
而且小数点只能输入一个,前面两个解决了,但是
我还是想用Keychar来解决
用一个比较恶心的方法解决了
在文本框Valuechange的时候替换空格
Forms("发料单").Controls("Qty").Value=Cstr(Forms("发料单").Controls("Qty").Value).Replace(" ","")
[此贴子已经被作者于2014-1-4 16:48:10编辑过]

 回到顶部