Foxtable(狐表)用户栏目专家坐堂 → 密码字符


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

主题:密码字符

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


加好友 发短信
等级:三尾狐 帖子:773 积分:6185 威望:0 精华:0 注册:2012/6/11 17:21:00
密码字符  发帖心情 Post By:2018/1/19 22:27:00 [只看该作者]

 密码必须是6-16个字母或数字组成,请老师指教,谢谢!
Dim str = e.Form.Controls("密码").Text
    Dim reg = New System.Text.RegularExpressions.Regex("^[A-Za-z0-9]+$")
    If reg.Ismatch(str) = False OrElse str.Length < 6 And str.Length > 16 Then
        MessageBox.Show("密码必须是6-16个字母或数字组成 !","提示", MessageBoxButtons.OK,MessageBoxIcon.Question)
        e.Form.Controls("密码").Select()
        Return
    End If

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


加好友 发短信
等级:超级版主 帖子:105965 积分:538900 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/1/19 22:36:00 [只看该作者]

If reg.Ismatch(str) = False OrElse str.Length < 6 OrElse str.Length > 16 Then

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


加好友 发短信
等级:三尾狐 帖子:773 积分:6185 威望:0 精华:0 注册:2012/6/11 17:21:00
  发帖心情 Post By:2018/1/21 14:51:00 [只看该作者]

谢谢 

 回到顶部