怎样计算和确定身份证号码的最后一个数字

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/08 01:24:03

怎样计算和确定身份证号码的最后一个数字
怎样计算和确定身份证号码的最后一个数字

怎样计算和确定身份证号码的最后一个数字
假如身份证号在A2,在B2输入:=RIGHT(A2,1)

在EXCEL中,编辑代码
Function idcode(sCode As String) As String
Dim I As Integer
Dim num As Integer
Dim Code As String
num = 0
idcode = sCode
For I = 18 To ...

全部展开

在EXCEL中,编辑代码
Function idcode(sCode As String) As String
Dim I As Integer
Dim num As Integer
Dim Code As String
num = 0
idcode = sCode
For I = 18 To 2 Step -1
num = num + (2 ^ (I - 1) Mod 11) * (Mid(idcode, 19 - I, 1))
Next I
num = num Mod 11
Select Case num
Case 0
Code = "1"
Case 1
Code = "0"
Case 2
Code = "X"
Case Else
Code = Trim(Str(12 - num))
End Select
idcode = idcode + Code
End Function

收起

身份证号码后面四位是电脑随机取的,倒数第二位表示性别,奇数为男,偶数为女

32092319511108321