Download presentation
Presentation is loading. Please wait.
1
身份证编码 地址码 出生日期 顺序号 校验码
2
身份证号码 结构 :18位身份证由十七位数字本体码和一位校验码组成。
排列顺序从左至右依次为:六位数字地址码,八位数字出生日期码,三位数字顺序码和一位校验码。 地址码(前六位数):表示常住户口所在县(市、旗、区)的行政区划代码。地址码的编码规则为:第一位表示地区,第一、二两位组合表示省,自治区,直辖市),第3、4为表示地区(市,州, 盟),第5、6为表示县(旗,镇,区)的名称。 出生日期码(第7位至14位):表示出生的年、月、日 顺序码(第15位至17位):表示在同一地址码所标识的区域范围内,对同年、同月、同日出生的人编定的顺序号,顺序码的奇数分配给男性,偶数分配给女性。 校验码(第十八位数):作为尾号的校验码,是由号码编制单位按统一的公式计算出来的,分别为罗马数字0、1、2、3、4、5、6、7、8、9、x中的某一位。 特殊规定:末尾的 996, 997, 998和 999这四个号为百岁以上老人的特殊规定编号,其他任何人都不会有该编号。
3
任务 要求: 用户输入一个身份证号码 输出他的出生日期,性别,年龄(2015-出生年份) 算法:
判断身份证号码是否为18位,若不是,提示用户重新输入;若是,从第7位开始取4个字符,转换字符为数字,并将2015-出生年份的结果输出为年龄,类似的方法读取出生日期并输出,从第17位取1个字符,转换字符为数字,判断这个数的奇偶性,若为偶数,输出“女”,否则,输出“男”
4
字符串函数
5
字符串函数 函数名 功能 表达式范例 返回值 Len(x) 计算字符串的长度 Len(“abc”) 3 Mid(X,n,k)
Mid(“abcd”,2,3) “bcd” Asc(x) 根据字母求得它的ASCII码值 Asc(“A”) 65 chr(x) 根据ASCII码求出相应的字母 Chr(65) “A”
6
选择结构 If 条件1 then 语句系列1 Else 语句系列2 End if
7
多重选择结构 结构1 If 条件1 then 语句系列1 Elseif 条件2 then 语句系列2 Else 语句系列3 End if
结构2 If 条件1 then 语句系列1 Else 语句系列… if 条件2 then 语句系列2 语句系列3 end if End if
8
VB时间函数 Date,Time,Now函数:读取系统的日期时间 P=Date() P=Time() P=Now()
P=Year() 例:若当前时间为2015年9月21日19点26分45秒,则 P=Now() 结果为:P= :26:45 P=Date () 结果为:P= P=Time () 结果为:P=19:26:45 P=Year(now())结果为:P=2016
9
课后作业 作业本 ,
Similar presentations