- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 日期计算 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=72637)
-- 发布时间：2015/8/3 16:09:00
-- 日期计算
专业的工程师：
您好！我想在表中其中一列设置一个表达式，用来计算某车辆多少天没有到店里消费，应如何设置？请参看附件截图。
此主题相关图片如下：日期计算.jpg
-- 发布时间：2015/8/3 16:17:00
--
DataColChanged事件
Select Case e.DataCol.name
Case "最近到店"
Dim sp As TimeSpan = Date.Today - cdate(e.DataRow("最近到店"))
e.DataRow("间隔日期") = sp.TotalDays
End Select
AfterOpenProject事件
DataTables("表A").datacols("最近到店").RaiseDataColChanged