Foxtable(狐表) → 用户栏目 → 专家坐堂 → 时间日期列之间的差值计算？


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

主题：时间日期列之间的差值计算？
帅哥哟，离线，有人找我吗？
xiaofei_00
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：135 积分：1132 威望：0 精华：0 注册：2021/6/18 12:12:00 		时间日期列之间的差值计算？  发帖心情 Post By：2023/4/10 16:09:00 [只看该作者]

请问老师，两个时间日期列之间可以进行差值结算吗？比如有A、B、C 三列，C=B-A，这个怎么实现呢？C列的表达式怎么写？ ABC列的数据类型是什么类型？还有我只考虑整数天数，小时、分秒需要忽略掉
[此贴子已经被作者于2023/4/10 16:11:21编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106688 积分：542629 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/4/10 16:20:00 [只看该作者]


 回到顶部
帅哥哟，离线，有人找我吗？
xiaofei_00
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：135 积分：1132 威望：0 精华：0 注册：2021/6/18 12:12:00 		  发帖心情 Post By：2023/4/10 17:33:00 [只看该作者]

Dim dc As DataCol = e.DataCol
Dim dr As DataRow = e.DataRow
If dc.Name = "cqts" Then
If dr("sfsjwj") = Ture OrElse dr("chqx") = Ture Then
    dr("cqts") = Nothing
Else
    Dim tp As TimeSpan = dr(Today) - dr("wcsj")
    dr("cqts") = tp.TotalDays
End If
End If

图片点击可在新窗口打开查看此主题相关图片如下：微信图片_20230410173212.png
图片点击可在新窗口打开查看


什么原因呢？老师
[此贴子已经被作者于2023/4/10 17:33:27编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106688 积分：542629 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/4/10 17:34:00 [只看该作者]

抄作业要抄完整哦

If dr.isnull("sfsjwj") = Ture OrElse dr.isnull("chqx") = Ture Then
 回到顶部
帅哥哟，离线，有人找我吗？
xiaofei_00
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：135 积分：1132 威望：0 精华：0 注册：2021/6/18 12:12:00 		  发帖心情 Post By：2023/4/11 8:33:00 [只看该作者]

还是这样图片点击可在新窗口打开查看

 回到顶部
帅哥哟，离线，有人找我吗？
xiaofei_00
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：135 积分：1132 威望：0 精华：0 注册：2021/6/18 12:12:00 		  发帖心情 Post By：2023/4/11 8:34:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：微信图片_20230411083240.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106688 积分：542629 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/4/11 8:42:00 [只看该作者]

True 

 回到顶部
帅哥哟，离线，有人找我吗？
xiaofei_00
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：135 积分：1132 威望：0 精华：0 注册：2021/6/18 12:12:00 		  发帖心情 Post By：2023/4/11 8:52:00 [只看该作者]

一步一个坎啊，老师辛苦了图片点击可在新窗口打开查看 是不是today 不能这么用啊？
[此贴子已经被作者于2023/4/11 8:52:14编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
xiaofei_00
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：135 积分：1132 威望：0 精华：0 注册：2021/6/18 12:12:00 		  发帖心情 Post By：2023/4/11 8:52:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：微信图片_20230411085051.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106688 积分：542629 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/4/11 8:59:00 [只看该作者]

多看看编程基础，否则何止一步一坑......

Dim dc As DataCol = e.DataCol
Dim dr As DataRow = e.DataRow
If dc.Name = "wcsj" Then
If dr.isnull("wcsj") = True Then
    dr("cqts") = Nothing
Else
    Dim tp As TimeSpan =date.Today - cdate(dr("wcsj"))
    dr("cqts") = tp.TotalDays
End If
End If

另外建议如果列名使用拼音还不如直接用中文列名
 回到顶部
总数 11 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04102 秒, 4 次数据查询