Foxtable(狐表)用户栏目专家坐堂 → [求助]时间差计算


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

主题:[求助]时间差计算

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/4/19 19:43:00 [显示全部帖子]

Select Case e.DataCol.name
    Case "入井时间","升井时间"
        Dim dr As DataRow = e.DataRow
        If dr.IsNull("入井时间") Or dr.IsNull("升井时间") Then
            dr("计时") = Nothing
        Else
            Dim tp As TimeSpan
            If dr("升井时间") > dr("入井时间")
                tp = dr("升井时间") - dr("入井时间")
                dr("计时") = tp.TotalSeconds()  
            Else
                tp = cdate(dr("升井时间")).adddays(1) - cdate(dr("入井时间"))
                dr("计时") = tp.TotalSeconds()   '真正的时段型数据要转换为秒数,才能存入时段列
            End If
        End If
End Select

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/4/19 19:55:00 [显示全部帖子]

模板那里这样写

 

<[计时] \ 3600 & ":" & ([计时] mod 3600) \ 60 & ":" & ([计时] mod 60)>


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/4/19 20:14:00 [显示全部帖子]

改成

 

<[计时] \ 3600 & "时" & ([计时] mod 3600) \ 60 & "分">


 回到顶部