| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 身份证审核问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=74575) |
| -- 作者：HJG_HB950207 -- 发布时间：2015/9/14 14:54:00 -- 身份证审核问题 请教老师代码： 表A 有姓名，身份证列。由于身份证是从电子表导入，现在增加审核列，如身份证不符逻辑要求，在审核列自动计入“错误”
|
| -- 作者：HJG_HB950207 -- 发布时间：2015/9/14 15:01:00 -- 对所有已存的记录 |
| -- 作者：狐表开发 -- 发布时间：2015/9/14 15:04:00 -- 先判断身份证的日期是否符合要求，再检验校验码 |
| -- 作者：大红袍 -- 发布时间：2015/9/14 15:04:00 -- 参考函数
http://www.foxtable.com/help/topics/2624.htm
|
| -- 作者：狐表开发 -- 发布时间：2015/9/14 15:28:00 -- Dim Identify As String = "440200201519111115" 结果为True 日期不正确，可见日期需要另行判断 |
| -- 作者：大红袍 -- 发布时间：2015/9/14 15:47:00 -- 这个函数不太准确，大基本上可以满足大部分的判断的。 |
| -- 作者：狐表开发 -- 发布时间：2015/9/14 15:50:00 -- 只是判断校验码，未判断日期 |
| -- 作者：大红袍 -- 发布时间：2015/9/14 16:07:00 -- 以下是引用狐表开发在2015/9/14 15:50:00的发言：
只是判断校验码，未判断日期
大部分都能判断。
那就再取一下日期。http://www.foxtable.com/help/topics/0320.htm
|