Foxtable(狐表)用户栏目专家坐堂 → 时间逻辑i计算


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

主题:时间逻辑i计算

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


加好友 发短信
等级:九尾狐 帖子:2461 积分:22720 威望:0 精华:0 注册:2011/3/29 17:14:00
时间逻辑i计算  发帖心情 Post By:2018/7/13 15:28:00 [显示全部帖子]

增加一个条件
如果  验收日期  为空值
计算  剩余时间  交期时长
如果  验收日期  为不空值 不做任何计算

If e.DataCol.Name = "交货日期" Then
    If e.DataRow.IsNull("交货日期") Then
        e.DataRow("剩余时间") = Nothing
    Else
        Dim ts As TimeSpan = cdate(e.DataRow("交货日期")) - Date.Today
        Dim t1s As TimeSpan = cdate(e.DataRow("交货日期")) - cdate(e.DataRow("下单日期"))
        e.DataRow("剩余时间") = ts.TotalDays & "天"
        e.DataRow("交期时长") = t1s.TotalDays  & "天"
    End If
End If

 回到顶部