Foxtable(狐表)用户栏目专家坐堂 → 程序代码求教


  共有26628人关注过本帖树形打印复制链接

主题:程序代码求教

帅哥哟,离线,有人找我吗?
ylm
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:315 积分:3217 威望:0 精华:6 注册:2008/8/31 19:42:00
  发帖心情 Post By:2008/10/9 15:31:00 [显示全部帖子]

 

ReadSex

从身份证号码中读取性别

语法

ReadSex(Value)

Value:身份证号码

例如:

Dim Identify As String = "410110197109172433"
Dim
Sex As String = ReadSex(Identify)
Output.Show(Sex)

上述代码的输出结果是“男”。

 
 

ReadBirthDay

从身份证号码中读取出生日期

语法

ReadBirthDay(Value)

Value:身份证号码

例如:

Dim Identify As String = "410110197109172433"
Output.Show(ReadBirthDay(Identify))

上述代码的输出结果是“1971-9-17”,即1971年9月17日




下次记得先搜索一下帮助文件哦.

 回到顶部