以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]计算间隔天数问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=44588)

--  作者:zyys2813
--  发布时间:2014/1/4 13:11:00
--  [求助]计算间隔天数问题
如有一日期列,另一整数列根据日期列计算出距离当天的天数
我的问题是这个代码写在哪?
写在该表的 DataColChanged 里不会自动更新,应该放在哪,实现自动更新呢?

代码例子: 

Dim dd1 As DataRow = e.DataRow

Dim dd2 As Date = e.DataRow("预计日期")

Dim dd3 As Integer = (dd2 - Date.today).TotalDays

If dd1("预计日期") = Nothing Then

    e.DataRow("剩余天数") = dd3

End If

代码写的有点乱.



--  作者:Bin
--  发布时间:2014/1/4 14:11:00
--  
在AlteropenPROJECT事件中 添加代码 

datatables("表名").datacols("预计日期").RaiseDataColChanged

--  作者:zyys2813
--  发布时间:2014/1/4 14:39:00
--  
谢谢Bin超版