身份证验证程序_新员工身份证验证程序

2020-02-28 其他范文 下载本文

身份证验证程序由刀豆文库小编整理,希望给你工作、学习、生活带来方便,猜你可能喜欢“新员工身份证验证程序”。

#include

#pragma hdrstop

#include “Unit1.h”

//-------------

#pragma package(smart_init)

#pragma resource “*.dfm”

TForm1 *Form1;

//-------------

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

//-------------

void __fastcall TForm1::Button1Click(TObject *Sender)

{

int len=m_Num->GetTextLen();//得到字符串输入长度

if(len==15)

{

bool bl=true;

for(int i=0;i

{

char tem=m_Num->Text[i+1];

if(tem'9')

{

ShowMeage(“身份证号输入不合法!”);

bl=false;

break;

}

}

if(m_Num->Text.SubString(9,2).AnsiCompare(“01”)Text.SubString(9,2).AnsiCompare(“12”)>0)//检查月份输入是否合法

{

ShowMeage(“身份证号中月份输入不合法!”);

bl=false;

}

if(m_Num->Text.SubString(11,2).AnsiCompare(“01”)Text.SubString(11,2).AnsiCompare(“31”)>0)//检查日期输入是否合法

{

ShowMeage(“身份证号中日期输入不合法!”);

bl=false;} if(bl){AnsiString tem;

AnsiString sex=((m_Num->Text[15]-'0')%2==0)?“女”:“男”;//判定

男(奇数)、女(偶数)

tem=“该身份证为旧式身份证,其中包含信息信息如下:rn出生年月:”;tem+=m_Num->Text.SubString(7,4);

tem+=“年”;

tem+=m_Num->Text.SubString(11,2);

tem+=“月”;

tem+=m_Num->Text.SubString(13,2);

tem+=“日”;

tem+=“rn性别为:”;

tem+=sex;

m_Fmt->Text=tem;//输出

}

}

else if(len==18)

{

bool bl=true;

for(int i=0;i

{

char tem=m_Num->Text[i+1];//依次取出字符串中的字符进行判

定,不为数字即不合法

if(i==17&&tem=='x'){break;}//旧式身份证末尾X判定if(tem'9')

{

ShowMeage(“身份证号输入不合法!”);

bl=false;

break;

}

}

if(m_Num->Text.SubString(11,2).AnsiCompare(“01”)Text.SubString(11,2).AnsiCompare(“12”)>0)

{

ShowMeage(“身份证号中月份输入不合法!”);

bl=false;

}

if(m_Num->Text.SubString(13,2).AnsiCompare(“01”)Text.SubString(13,2).AnsiCompare(“31”)>0)

{

ShowMeage(“身份证号中日期输入不合法!”);

bl=false;

}

if(bl)

{String tem;

AnsiString sex=((m_Num->Text[17]-'0')%2==0)?“女”:“男”;

tem=“该身份证为新式身份证,其中包含信息信息如下:rn出生年月:”;tem+=m_Num->Text.SubString(7,4);

tem+=“年”;

tem+=m_Num->Text.SubString(11,2);

tem+=“月”;

tem+=m_Num->Text.SubString(13,2);

tem+=“日”;

tem+=“rn性别为:”;

tem+=sex;

m_Fmt->Text=tem;

}

}

else

ShowMeage(“身份证号长度输入不合法!”);

}

//-------------

void __fastcall TForm1::Button2Click(TObject *Sender)

{

m_Num->Clear();//清空编辑框

m_Fmt->Clear();

}

//-------------

《身份证验证程序.docx》
将本文的Word文档下载,方便收藏和打印
推荐度:
身份证验证程序
点击下载文档
相关专题 新员工身份证验证程序 身份证 程序 新员工身份证验证程序 身份证 程序
[其他范文]相关推荐
    [其他范文]热门文章
      下载全文