编程论坛 » VB.NET论坛 » 求助：TEXTBOX限制只输入为整数和字母，其他字符都不行

a254298492 发表于 2008-4-27 23:58

求助：TEXTBOX限制只输入为整数和字母，其他字符都不行

TEXTBOX限制只输入为整数和字母，其他字符都不行！
     帮忙。求代码！

hxfly 发表于 2008-4-28 00:29

Private   Sub   TextBox1_KeyPress(ByVal   sender   As   Object,   ByVal   e   As   System.Windows.Forms.KeyPressEventArgs)   Handles   TextBox1.KeyPress   
                  Dim   keyii   As   Integer   
                  keyii   =   Asc(e.KeyChar)   
                  Select   Case   keyii   
                          Case   48   To   57,   65   To   90,   97   To   122   
                          Case   Else   
                                  keyii   =   0   
                  End   Select   
                  If   keyii   =   0   Then   
                          e.Handled   =   True   
                  Else   
                          e.Handled   =   False   
                  End   If   
          End   Sub

fairy4 发表于 2008-4-28 10:22

將字符，數字，轉為ASII碼，判斷範圍！

tntzwc 发表于 2008-4-29 17:04

Regex r = new Regex(@"[A-Za-z0-9]+$");
r.IsMatch(str);

这样也可以。

查看完整版本: 求助：TEXTBOX限制只输入为整数和字母，其他字符都不行