[求助]小虾米求助各位大虾

piaoran

偶是个菜鸟虾米

有两个表

表1：姓名、性别、身份证号、出生日期、年龄、等级、金额

表2：等级、金额

希望实现功能：

1、输入身份证号，出生日期、年龄、性别自动生成

2、输入等级，自动生成金额

偶是新学的，求助各位大虾了

谢谢

mailfh@tom.com

piaoran

唉

伤心啊！

本来以为找到家了

没想到是有人看没人回啊！

难道这个问题简单到大虾都不懈回复？

sgrshh29

身份证号码 = 15

   出生年月 = "19" & Mid(身份证号码, 7, 2) & "/" & Mid(身份证号码, 9, 2) & "/" & Mid(身份证号码, 11, 2) '& ""

   年龄 = Year(Now()) - Year(CDate(出生年月)) '& "岁"

   If Mid(身份证号码, 13, 3) Mod 2 = 1 Then

   性别 = "男"

   Else

   性别 = "女"

   End If

身份证号码 = 18

   出生年月 = Mid(身份证号码, 7, 4) & "/" & Mid(身份证号码, 11, 2) & "/" & Mid(身份证号码, 13, 2) ' & ""

   年龄 = Year(Now()) - Year(CDate(出生年月)) '& "岁"

   If Mid(身份证号码, 15, 3) Mod 2 = 1 Then

   性别 = "男"

   Else

   性别 = "女"

   End If