主题：密码至少包含数字和字母

修改密码控件，密码至少包含数字和字母，求老师指点代码，谢谢！

参考

 

http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=79534&authorid=0&page=0&star=2

 

    Dim str = e.Form.Controls("密码").Text
    Dim reg = New System.Text.RegularExpressions.Regex("^[A-Za] + [0-9]+$")
    If reg.Ismatch(str) = False OrElse str.Length < 6 OrElse str.Length > 16 Then
        MessageBox.Show("密码必须 6-16 位包含字母或数字 !","提示", MessageBoxButtons.OK,MessageBoxIcon.Question)
        e.Sender.Select()
        Return
    End If
End If

Dim reg = new System.Text.RegularExpressions.Regex("^(?=.*[0-9])(?=.*[a-zA-Z]).{6,16}$")
Dim Password = "abceerere"
If reg.Ismatch(Password) = False Then
    msgbox("不符合")
Else
    msgbox("符合")
End If

谢谢