15位身份证转18位批量转换工具及其算法(VB版)

前端之家收集整理的这篇文章主要介绍了15位身份证转18位批量转换工具及其算法(VB版)前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

15位身份证转18位批量转换工具及其算法

*************************************************


ID_Change身份证自动转换工具BY:JuNe-Ff



**************************************************

********************************************************************************************

********************************************************************************************

---------------------------------------------V1.0.0-----------------------------------------

功能说明:

1、可自动将15位身份证转换为18号身份证,并自动复制到剪帖板中。


---------------------------------------------V1.0.2-----------------------------------------

1、可自动将15位身份证转换为18号身份证,并自动复制到剪帖板中。

2、增加导入EXCEL批量转换功能,excel格式请参考程序目录下模板文件

3、可自动断定身份证是否为15位,如果不是15位保留原值不进行转换,并在后一列自动标识出来。


----------------------------------------------------------------------------------------------------

算法如下:


身份证标准在国家质量技术监督局于1999年7月1日实施的GB11643-1999《公民身份号码》中做了明确的规定。
GB11643-1999《公民身份号码》从实施之日起代替GB11643-1989。GB11643-1999《公民身份号码》主要内容如下:
一、范围
该标准规定了公民身份号码的编码对象、号码的结构和表现形式,使每个编码对象获得一个唯一的、不变的法定号码。
二、编码对象
公民身份号码的编码对象是具有中华人民共和国国籍的公民。
三、号码的结构和表示形式
1、号码的结构
公民身份号码是特征组合码,由十七位数字本体码和一位校验码组成。
排列顺序从左至右依次为:
六位数字地址码
八位数字出生日期码
三位数字顺序码
一位数字校验码。
2、地址码
表示编码对象常住户口所在县(市、旗、区)的行政区划代码,按GB/T2260的规定执行。
3、出生日期码
表示编码对象出生的年、月、日,按GB/T7408的规定执行,年、月、日代码之间不用分隔符。
4、顺序码
表示在同一地址码所标识的区域范围内,对同年、同月、同日出生的人编定的顺序号,顺序码的奇数分配给男性,偶数分配给女性。
5、校验码
(1)十七位数字本体码加权求和公式
S=Sum(Ai*Wi),i=0,...,16,先对前17位数字的权求和
Ai:表示第i位置上的身份证号码数字值
Wi:表示第i位置上的加权因子
Wi:7910584216379105842
(2)计算模
Y=mod(S,11)
(3)通过模得到对应的校验码
Y:012345678910
校验码:10X98765432


以下为自己写的软件

点击打开链接

原文链接:https://www.f2er.com/vb/259498.html

猜你在找的VB相关文章