主题：剩余工期，每天自动变化；

以前编写的代码在 

DataColChanged

中： 但是表格中数据没有变化时， 剩余工期就不会变化；还是前期的剩余天数；

剩余工期= 要求完成时间 - 今日时间

如何让剩余工期每天自动变更？？

应该在什么地方写什么代码？

 

 

 

Dim tm001 As TimeSpan

Dim dm001 As Date = CurrentTable.Current("要求完成时间")
If e.DataRow.IsNull("要求完成时间") Then
e.DataRow("剩余工期") = Nothing
Else
tm001 = dm001 - Date.Today
e.DataRow("剩余工期") = tm001.TotalDays
End If

项目打开后，代码还是错误，请问如何编写代码。项目打开后自动更新日期。

 

我是新手，请尽量写详细点。谢谢各位老师。

 

 

此主题相关图片如下：3333.png

 还是没有实现  剩余工期，每天自动变化； 

老师，我在窗口中 加入了一个按钮， 点击才执行 RaiseDataColChanged

但是我一点击“刷新工期”，应该就执行  RaiseDataColChanged

结果是：所有项目的“剩余工期”全部都变成了 一个数字；且感觉没什么逻辑关系。

隔会再点  “刷新工期”， 则 所有项目的“剩余工期”又变成另外一个 数字。

 

 

剩余工期= 要求完成时间 - 今日时间
要求完成时间 = 任务发起时间 + 要求工期

 

所以我按钮就是：  刷新工期 

 

DataTables("任务清单台账").datacols("要求工期").RaiseDataColChanged

此主题相关图片如下：刷新工期.png

代码如下：
没有刷新的程序，以前是正常的。
增加刷新，就出错了。

 

此主题相关图片如下：刷新222.jpg

还有什么办法能解决自动更新；或 点击 刷新按钮 更新。。

或者 用其他办法？

比如： 新增一列，今日日期； 当完工进度是  未完成的时候。 点击按钮，自动填入 今日日期；相当于每天手动更新表格中的 “今日日期”；这样可行吗？
代码如何写？ 在哪个地方写？   我还是新手。

老师，可以远程解决吗？