Foxtable(狐表)用户栏目专家坐堂 → [求助]进度表


  共有2421人关注过本帖树形打印复制链接

主题:[求助]进度表

帅哥哟,离线,有人找我吗?
seal51
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
[求助]进度表  发帖心情 Post By:2017/10/20 15:38:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:wuyi20171020153536.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/10/20 15:51:00 [只看该作者]

Select Case e.DataCol.Name
    Case "开始日期","完成日期"
        Dim dr As DataRow = e.DataRow
        If dr.IsNull("开始日期")  Then
            dr("执行天数") = Nothing
        ElseIf dr.IsNull("完成日期") Then

            Dim tp As TimeSpan = Date.Today - cdate(dr("开始日期") )
            dr("执行天数") = tp.TotalDays

        Else

            Dim tp As TimeSpan = dr("完成日期") - dr("开始日期")
            dr("执行天数") = tp.TotalDays
        End If
End Select


 回到顶部
帅哥哟,离线,有人找我吗?
seal51
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2017/10/20 16:42:00 [只看该作者]

老师帮忙看看能否优化一下代码
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:图纸进度111.zip


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/10/20 16:57:00 [只看该作者]

 你是说优化事件代码?代码没问题的,必须像你那样写。

 回到顶部
帅哥哟,离线,有人找我吗?
seal51
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2017/10/20 17:21:00 [只看该作者]

有点复杂, 谢谢老师了, 还有一个小问题, 就是选择审图完成时间,计算出审图时间,但是清除审图完成时间, 计算得出的审图时间不消失??

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/10/20 18:18:00 [只看该作者]

以下是引用seal51在2017/10/20 17:21:00的发言:
有点复杂, 谢谢老师了, 还有一个小问题, 就是选择审图完成时间,计算出审图时间,但是清除审图完成时间, 计算得出的审图时间不消失??

 

我测试没问题。删除之后,就用今天的日期进行计算了。


 回到顶部
帅哥哟,离线,有人找我吗?
seal51
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2017/10/27 10:14:00 [只看该作者]

重新打开项目为何不从今天的日期计算了, 还是昨天的

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/10/27 10:15:00 [只看该作者]

以下是引用seal51在2017/10/27 10:14:00的发言:
重新打开项目为何不从今天的日期计算了, 还是昨天的

 

重置列

 

http://www.foxtable.com/webhelp/scr/1587.htm

 


 回到顶部
帅哥哟,离线,有人找我吗?
seal51
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2017/10/27 10:46:00 [只看该作者]

谢谢!OK了!, 如何一个表中有任何数据变化, 那么自动保存, 代码如何写, 放在那里

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/10/27 10:47:00 [只看该作者]

以下是引用seal51在2017/10/27 10:46:00的发言:
谢谢!OK了!, 如何一个表中有任何数据变化, 那么自动保存, 代码如何写, 放在那里

 

datacolchanged事件,加入 e.DataTable.Save 或者 e.DataRow.Save


 回到顶部
总数 15 1 2 下一页