function sfzztobdayy(ss:string):string;
var i,j :integer;
f:string;
aa:string;
begin
f:='-' ;
case length(ss) of
15 :begin
i:=7 ;
j:=12;
while i<=j do
begin
aa:=aa+copy(ss,i,1);
if i=8 then
begin
aa:=aa+f;
end;
if i=10 then
begin
aa:=aa+f;
end;
i:=i+1;
end;
end;
18 :begin
i:=7 ;
j:=14;
while i<=j do
begin
aa:=aa+copy(ss,i,1);
if i=10 then
begin
aa:=aa+f;
end;
if i=12 then
begin
aa:=aa+f;
end;
i:=i+1;
end;
end;
19 :begin
i:=7 ;
j:=14;
while i<=j do
begin
aa:=aa+copy(ss,i,1);
if i=10 then
begin
aa:=aa+f;
end;
if i=12 then
begin
aa:=aa+f;
end;
i:=i+1;
end;
end;
end;
ss:=aa;
result := ss;
end;
根據身份證號回填生日
根據身份證號回填生日 開發工具與關鍵技術 visual studio 2015在我們做的很多專案中,我們都可以看到很多賬號的註冊,而在我們註冊賬號的時候總是要填寫很多很多關於個人的一些資訊,而我們的身份證資訊以及生日這些資訊往往就是我們必填的選項,所以我們在填寫完我們的身份證資訊之後,如何讓我們的生...
身份證號判斷男女和生日
身份證 驗證 function checkidcard idcode 獲取餘數 var resisue num 11 var last no check code resisue 1 第一位不可能是0 2 第二位到第六位可以是0 9 3 第七位到第十位是年份,所以七八位為19或者20 4 十一位和十...
身份證號的檢測
ddddddyyyymmddxxsp共18位 公民身份號碼是特徵組合碼,由十七位數字本體碼和一位校驗碼組成。排列順序從左至右依次為 六位數字位址碼,八位數字出生日期碼,三位數字順序碼和一位數字校驗碼。2 位址碼 表示編碼物件常住戶口所在縣 市 旗 區 的行政區劃 按gb t2260的規定執行。3 出...