以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  计算年龄（已上传附件）  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=96709)

--  作者：guimingze --  发布时间：2017/2/26 22:54:00 --  计算年龄（已上传附件）  下载信息  [文件大小：   下载次数： ] 点击浏览该文件:管理项目1.table e.DataRow("年龄") = Date.Today.Year - e.DataRow("出生年月").Year 老师其实我出生年月一栏肯定有数的  我就想直接用后面之一段公式代码  可以直接用么？ 如 出生年月为1987.09  现在是2017.02   2017.02-1987.09     计算周岁 [此贴子已经被作者于2017/2/26 22:56:35编辑过]

--  作者：y2287958 --  发布时间：2017/2/26 23:26:00 --   DataColChanged事件，试试这个 If e.DataCol.name = "出生年月" Then     If e.DataRow.IsNull("出生年月") = False         If Date.Today.Month >= CInt(e.DataRow("出生年月").split(".")(1))             e.DataRow("年龄") = Date.Today.Year - CInt(e.DataRow("出生年月").split(".")(0))         Else             e.DataRow("年龄") = Date.Today.Year - CInt(e.DataRow("出生年月").split(".")(0)) -1         End If     Else         e.DataRow("年龄") = Nothing     End If End If

--  作者：guimingze --  发布时间：2017/3/5 22:17:00 --  回复：（y2287958）DataColChanged事件，试试这个If e... 老师辛苦了， 正是我需要的效果，最近工作忙没及时看到论坛老师写的，谢谢