身份证编码 330304 19971027 031 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这四个号为百岁以上老人的特殊规定编号,其他任何人都不会有该编号。
任务 要求： 用户输入一个身份证号码 输出他的出生日期，性别，年龄（2015-出生年份） 算法： 判断身份证号码是否为18位，若不是，提示用户重新输入；若是，从第7位开始取4个字符，转换字符为数字，并将2015-出生年份的结果输出为年龄，类似的方法读取出生日期并输出，从第17位取1个字符，转换字符为数字，判断这个数的奇偶性，若为偶数，输出“女”，否则，输出“男”
字符串函数
字符串函数 函数名 功能 表达式范例 返回值 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”
选择结构 If 条件1 then 语句系列1 Else 语句系列2 End if
多重选择结构 结构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
VB时间函数 Date,Time,Now函数：读取系统的日期时间 P=Date() P=Time() P=Now() P=Year() 例：若当前时间为2015年9月21日19点26分45秒，则 P=Now() 结果为：P=2003-08-29 19:26:45 P=Date () 结果为：P=2003-08-29 P=Time () 结果为：P=19:26:45 P=Year(now())结果为：P=2016
课后作业 作业本 3.10 ， 3.11