Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
If 15<>C.Length<>18 THEN
MessageBox.Show("录入身份证号位数错误,请核对!!!", "提示", MessageBoxButtons.OK,MessageBoxIcon.Information)
Return '终止代码的执行
Else
If C.Length <> 15 AndAlso C.Length <>18 Then
MessageBox.Show("录入身份证号位数错误,请核对!!!", "提示", MessageBoxButtons.OK,MessageBoxIcon.Information)
Return '终止代码的执行
更有效的办法,用ReadBirthday和ReadSex函数从身份证号码读取出生日期和性别,如果能正常,说明身份证号码正确。