以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  计算工龄和年龄表达式错误  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=157094)
--  作者：haiyang322
--  发布时间：2020/10/1 16:25:00
--  计算工龄和年龄表达式错误
1.通过入职日期计算工龄怎么写？(today()-[入职时间])/365
2.通知身份证号如何算年龄，表格上可以FOXTABLE不行？YEAR(TODAY())-MID([身份证号码],7,4) 显示为表达式错误，身份证号为字符型
--  作者：hongsejiyi
--  发布时间：2020/10/2 17:14:00
--  
Dim sfz As String = CurrentTable.Current("第三列")  ‘当前记录的第三列，存放的是18位的字符弄身份证号码
Dim yf As String =sfz.SubString(6,4)
output.Show(Date.Today.Year- yf)  ’显示当前系统日期的年份，减去上边求得身份证的年份，求得年龄
--  作者：hongsejiyi
--  发布时间：2020/10/2 17:18:00
--  

在上边的基础上，用以下的专用函数，可以从身份证字符串中，直接读取生日
Output.Show(ReadBirthDay(sfz))

显示格式：1999-08-03
--  作者：新福星
--  发布时间：2020/10/3 6:21:00
--  

http://www.foxtable.com/webhelp/topics/0287.htm