剩余工期，每天自动变化； - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 剩余工期，每天自动变化；

共有2650人关注过本帖树形打印复制链接主题：剩余工期，每天自动变化；

zerozm

小大 11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：144 积分：1588 威望：0 精华：0 注册：2019/1/12 17:30:00

Post By：2019/7/15 13:56:00 [只看该作者]

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

或者用其他办法？

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

[此贴子已经被作者于2019/7/15 13:56:23编辑过]

有点蓝

小大 12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：105948 积分：538809 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2019/7/15 13:57:00 [只看该作者]

表事件里不要使用CurrentTable.Current
改为用e.datarow

Dim dm001 As Date = e.DataRow("要求完成时间")

If e.DataRow.IsNull("要求完成时间") Then

e.DataRow("剩余工期") = Nothing

Else

tm001 = dm001 - Date.Today

e.DataRow("剩余工期") = tm001.TotalDays

End If

另外代码文字能够直接贴的请直接贴，方便别人改。尽量不要截图

zerozm

小大 13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：144 积分：1588 威望：0 精华：0 注册：2019/1/12 17:30:00

Post By：2019/7/15 13:59:00 [只看该作者]

老师，可以远程解决吗？

有点蓝

小大 14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：105948 积分：538809 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2019/7/15 14:06:00 [只看该作者]

还有什么问题？

客人(61.188.*.*)

小大 15楼

Post By：2019/7/15 14:40:00 [只看该作者]

谢谢老师。辛苦了。。

总数 15 上一页 1 2

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