Foxtable(狐表)用户栏目专家坐堂 → TextBox如何禁止输入中文?只能是英文、数字、标点符号


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

主题:TextBox如何禁止输入中文?只能是英文、数字、标点符号

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


加好友 发短信
等级:二尾狐 帖子:388 积分:5098 威望:0 精华:0 注册:2013/11/2 0:01:00
TextBox如何禁止输入中文?只能是英文、数字、标点符号  发帖心情 Post By:2016/12/28 15:24:00 [只看该作者]

我想设置一个TextBox让客户自己编辑登陆帐号,无奈这玩意可以输入中文。怎么才能让它无法输入中文?或者换个什么控件更好?

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


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

 你可以在Enter事件,加如如下代码,切换到默认输入法,简单控制


Windows.Forms.InputLanguage.CurrentInputLanguage = Windows.Forms.InputLanguage.DefaultInputLanguage

  然后,你可以在Validating事件,对输入的内容进行校验嘛,提示不能输入中文。


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


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

 最简单粗暴的方法,是在TextChanged事件写代码

 

systemready = False
Dim idx As Integer = e.Sender.SelectionStart
e.sender.text = System.Text.RegularExpressions.Regex.Replace(e.sender.text, "[^0-9\.a-zA-Z]", "")
e.Sender.SelectionStart = idx
systemready = True


 回到顶部