以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  表达式  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=175699)

--  作者:爱心则乐
--  发布时间:2022/3/15 21:48:00
--  表达式
求助根据身份证号计算年龄的表达式
--  作者:hongsejiyi
--  发布时间:2022/3/15 21:58:00
--  
Dim sfz As String = "132423197408031230"  \'字符型数据
Dim sr As Date = ReadBirthDay(sfz) \'返回日期型数据
output.Show(sr)  \'显示结果
    1974-08-03
--  作者:爱心则乐
--  发布时间:2022/3/17 9:25:00
--  
谢谢!!