如何利用VB程序设计编写身份证分析器程序
发布网友
发布时间:2022-05-11 01:45
我来回答
共1个回答
热心网友
时间:2023-11-24 13:02
当用户单击”输入身份证号”按钮时,弹出输入输入框,接收用户输入的身份证信息后,从身份证号中提取相关信息并显示在指定控件上。单击“输入身份证号”按钮,使用inputbox函数弹出以下对话框:身份证号=InputBox(对话框提示信息,标题,默认值)当用户选择inputbox的“确定”按钮时,执行身份证号判断操作。具体判断过程如下:当用户输入的身份证号不足18位时,使用msgbox函数。
应用技巧:1)检测身份证号长度使用Len()函数;2)使用If选择结构判断身份证号是否正确:if身份证号不足18位thenmsgbox给出提示else在指定控件显示出生年月、性别以及年龄EndIf3、当信息录入正确时,在指定控件显示出生年月、性别以及年龄。1)在名为shengri的文本框中显示出生年月,出生年月为身份证号的第7-14位提示:使用mid函数2)在名为nianling的文本框中显示年龄提示:使用year(now())获得系统日期的年份,使用mid函数获取身份证中年份信息,相减可得年龄。3)在名为xingbie的文本框中显示性别:身份证的第17位为偶数则为“女”,奇数为“男”。