[讨论]时间差计算不能自动更新 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

时间差计算：加入代码在系统打开后不能自更新天数，只维持第一次填日期时计算出的天数，

是不是Afterload这句有问题，还是放错地方了

在表属性DataColchanged中，

Select Case e.DataCol.name

Case "日期"

If e.DataRow.IsNull("日期") Then

e.DataRow("天数") = Nothing

Else

Dim tp As TimeSpan = Date.today - CDate(e.DataRow("日期"))

e.DataRow("天数") = Math.Round(tp.TotalDays)

End If

End Select

在Afterload中加：

DataTables("表A").DataCols("日期").RaiseDataColChanged()

主题：[讨论]时间差计算不能自动更新