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


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

主题:时间计算

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


加好友 发短信
等级:五尾狐 帖子:1014 积分:6757 威望:0 精华:0 注册:2014/2/12 20:14:00
时间计算  发帖心情 Post By:2015/1/9 11:46:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:保修日期.table

 

老师,通过输入购买日期、保修_保修期限的数据后自动计算出为当天后剩余的天数和保修_到期日期。谢谢


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/1/9 11:51:00 [只看该作者]

你保修期限,有没固定格式? 

比如   3年 1年    会不会出现   6个月  半年   2年半  这样的不规则格式.那可不好判断

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


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

 保修期限,弄成数值,字符串不好判断。

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


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


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


加好友 发短信
等级:五尾狐 帖子:1014 积分:6757 威望:0 精华:0 注册:2014/2/12 20:14:00
  发帖心情 Post By:2015/1/9 12:54:00 [只看该作者]

老师,应该是数字3而不是3年

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


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

 看4楼,类似的代码我已经写过给你的,你从来没有进步过。

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/1/9 14:14:00 [只看该作者]

DataColChanged事件

If e.DataCol.name="购买日期" OrElse e.DataCol.name= "保修_保修期限" Then
   If e.DataRow.IsNull("购买日期")=False AndAlso e.DataRow.IsNull("保修_保修期限")=False Then
      e.DataRow("保修_到期日期")= e.DataRow("购买日期").AddYears(e.DataRow("保修_保修期限"))
      e.DataRow("保修_剩余天数")=(Date.Today-Cdate(e.DataRow("保修_到期日期"))).Totaldays
   End If
End If

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


加好友 发短信
等级:五尾狐 帖子:1014 积分:6757 威望:0 精华:0 注册:2014/2/12 20:14:00
  发帖心情 Post By:2015/1/9 14:41:00 [只看该作者]


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

 

 


老师,由于保修期限的不确定性保修期可能有6个月或1.5年的数据出现,另外不要有负的天数出现。你是我们的好老师


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


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


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/1/9 14:46:00 [只看该作者]

第一个问题,问来还情有可原
把 保修期限 改为以月为单位
.AddYears(e.DataRow("保修_保修期限"))
改为.AddMonths(e.DataRow("保修_保修期限"))

第二个问题,为什么有负数,自己想,  怎么变为整数,自己想.   你从来都没有动过脑,整个项目都是别人帮你写的.

是时候自己动脑思考一下这个小学生数学问题了.



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