《自动转换15位身份证号码位18位》由会员分享，可在线阅读，更多相关《自动转换15位身份证号码位18位（2页珍藏版）》请在装配图网上搜索。
1、自动转换15位身份证号码位18位关键词：身份证功能：将15的身份证号升为18位(根据GB 11643-1999)参数：原来的号码(15位)返回：升位后的18位号码用法：=IDC0DE(a1)(假设A1放的是原15位号码)关于身份证号码最后一位的校验码的算法如下：我国现行使用公民身份证号码有两种尊循两个国家标准，GB 11643-1989和GB 11643-1999。GB 11643-1989中规定的是15位身份证号码：排列顺序从左至右依次为：六位数字地址码，六位数字出生日期码，三位数字顺 序码，其中岀生日期码不包含世纪数。GB 11643-1999中规定的是18位身份证号码：公民身份号码是特征
2、组合码，由十七位数字本体码和一位数字校验码组成。排列 顺序从左至右依次为：六位数字地址码，八位数字岀生日期码，三位数字顺序码和一位数字校验码。地址码表示编码对象常住户口所在县(市、旗、区)的行政区划代码。生日期码表示编码对象岀生的年、月、日，其中年份用四位数字表示，年、月、日之间不用分隔符。顺序码表示同一地址码所标识的区域范围内，对同年、月、日岀生的人员编定的顺序号。顺序码的奇数分给男性，偶数分给女性。校验码是根据前面十七位数字码，按照ISO 7064:1983.MOD 11-2校验码计算出来的检验码。公式如下：刀(ai*Wi】)mod 11 ( i = 2, 3,., 18 ) (1)*表示
3、乘号i表示身份证号码每一位的序号，从右至左，最左侧为18，最右侧为1 oai表示身份证号码第i位上的号码Wi-表示第 i 位上的权值 Wi = 2A(i-1) mod 11计算公式(1)令结果为R根据下表找岀 R对应的校验码即为要求身份证号码的校验码CoR 0 1 2 345678 9 10C 1 0 X 9 8 7 6 5 4 3 2由此看出X就是10 ,罗马数字中的10就是X,所以在新标准的身份证号码中可能含有非数字的字母XoFunction IDCode(sCode15)Dim i,numDim codenum = 0IDCode = Left(sCode15, 6) + 19 + Right(sCode15, 9)计算校验位For i = 18 To 2 Step -1num = num + (2 a (i - 1) Mod 11) * (Mid(IDCode, 19 - i, 1)Nextnum = num Mod 11Select Case numCase 0code = 1Case 1code = 0Case 2code = XCase Elsecode = Trim(CStr(12 - num)End SelectIDCode = IDCode + codeEnd Function
自动转换15位身份证号码位18位
