ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 592|回复: 1

[讨论] 看到一段身份证的正则代码,不知道是什么语言写的,vba有类似的代码可用吗?

[复制链接]

TA的精华主题

TA的得分主题

发表于 2022-9-28 21:09 | 显示全部楼层 |阅读模式
public class IDCardUtils {
     /**
     * 身份证号码正则表达式
     */
     public static boolean isIDCard(String idNum)  throws ParseException {
        //定义判别用户身份证号的正则表达式(要么是15位,要么是18位,最后一位可以为字母)
//        Pattern idNumPattern = Pattern.compile("(\\d{14}[0-9a-zA-Z])|(\\d{17}[0-9a-zA-Z])");
//        //通过Pattern获得Matcher
//        Matcher idNumMatcher = idNumPattern.matcher(idNum);
//         return idNumMatcher.matches();
         String[] ValCodeArr = { "1", "0", "x", "9", "8", "7", "6", "5", "4",
                 "3", "2" };
         String[] Wi = { "7", "9", "10", "5", "8", "4", "2", "1", "6", "3", "7",
                 "9", "10", "5", "8", "4", "2" };
         String Ai = "";
         // ================ 号码的长度 15位或18位 ================
         if (idNum.length() != 15 && idNum.length() != 18) {
             return false;
         }
         // =======================(end)========================

         // ================ 数字 除最后以为都为数字 ================
         if (idNum.length() == 18) {
             Ai = idNum.substring(0, 17);
         } else if (idNum.length() == 15) {
             Ai = idNum.substring(0, 6) + "19" + idNum.substring(6, 15);
         }
         if (isNumeric(Ai) == false) {
             return false;
         }
         // =======================(end)========================

         // ================ 出生年月是否有效 ================
         String strYear = Ai.substring(6, 10);// 年份
         String strMonth = Ai.substring(10, 12);// 月份
         String strDay = Ai.substring(12, 14);// 月份
         if (isDataFormat(strYear + "-" + strMonth + "-" + strDay) == false) {
             return false;
         }
         GregorianCalendar gc = new GregorianCalendar();
         SimpleDateFormat s = new SimpleDateFormat("yyyy-MM-dd");
         if ((gc.get(Calendar.YEAR) - Integer.parseInt(strYear)) > 150
                 || (gc.getTime().getTime() - s.parse(
                 strYear + "-" + strMonth + "-" + strDay).getTime()) < 0) {
             return false;
         }
         if (Integer.parseInt(strMonth) > 12 || Integer.parseInt(strMonth) == 0) {
             return false;
         }
         if (Integer.parseInt(strDay) > 31 || Integer.parseInt(strDay) == 0) {
             return false;
         }
         // =====================(end)=====================

         // ================ 地区码时候有效 ================
         Hashtable h = GetAreaCode();
         if (h.get(Ai.substring(0, 2)) == null) {
             return false;
         }
         // ==============================================

         // ================ 判断最后一位的值 ================
         int TotalmulAiWi = 0;
         for (int i = 0; i < 17; i++) {
             TotalmulAiWi = TotalmulAiWi
                     + Integer.parseInt(String.valueOf(Ai.charAt(i)))
                     * Integer.parseInt(Wi[i]);
         }
         int modValue = TotalmulAiWi % 11;
         String strVerifyCode = ValCodeArr[modValue];
         Ai = Ai + strVerifyCode;

         if (idNum.length() == 18) {
             if (Ai.equalsIgnoreCase(idNum) == false) {
                 return false;
             }
         } else {
             return true;
         }
         return true;

     }

    /**
     * 功能:判断字符串是否为数字
     * @param str
     * @return
     */
    private static boolean isNumeric(String str) {
        Pattern pattern = Pattern.compile("[0-9]*");
        Matcher isNum = pattern.matcher(str);
        if (isNum.matches()) {
            return true;
        } else {
            return false;
        }
    }

    /**
     * 功能:设置地区编码
     * @return Hashtable 对象
     */
    private static Hashtable GetAreaCode() {
        Hashtable hashtable = new Hashtable();
        hashtable.put("11", "北京");
        hashtable.put("12", "天津");
        hashtable.put("13", "河北");
        hashtable.put("14", "山西");
        hashtable.put("15", "内蒙古");
        hashtable.put("21", "辽宁");
        hashtable.put("22", "吉林");
        hashtable.put("23", "黑龙江");
        hashtable.put("31", "上海");
        hashtable.put("32", "江苏");
        hashtable.put("33", "浙江");
        hashtable.put("34", "安徽");
        hashtable.put("35", "福建");
        hashtable.put("36", "江西");
        hashtable.put("37", "山东");
        hashtable.put("41", "河南");
        hashtable.put("42", "湖北");
        hashtable.put("43", "湖南");
        hashtable.put("44", "广东");
        hashtable.put("45", "广西");
        hashtable.put("46", "海南");
        hashtable.put("50", "重庆");
        hashtable.put("51", "四川");
        hashtable.put("52", "贵州");
        hashtable.put("53", "云南");
        hashtable.put("54", "西藏");
        hashtable.put("61", "陕西");
        hashtable.put("62", "甘肃");
        hashtable.put("63", "青海");
        hashtable.put("64", "宁夏");
        hashtable.put("65", "新疆");
        hashtable.put("71", "台湾");
        hashtable.put("81", "香港");
        hashtable.put("82", "澳门");
        hashtable.put("91", "国外");
        return hashtable;
    }
}

TA的精华主题

TA的得分主题

发表于 2022-9-28 22:08 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
本帖最后由 zxsea_7426 于 2022-9-28 22:11 编辑

这个有点象是网页源码截取出来的吧。

这个有点像对输入的身份证号码进行校验用的,游戏网页\网站校验用的比较多吧.
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-4-29 02:14 , Processed in 0.022225 second(s), 8 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表