Foxtable(狐表)用户栏目专家坐堂 → 两个日期中是否有2月


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

主题:两个日期中是否有2月

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


加好友 发短信
等级:幼狐 帖子:154 积分:1331 威望:0 精华:0 注册:2017/10/8 14:56:00
两个日期中是否有2月  发帖心情 Post By:2017/11/10 16:07:00 [只看该作者]

两个时间段的年份是否为闰年,然后在判断两个时间段中是否有2月 ,如果有2月那么获取2月的最后一天!

这句代码如何写?

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


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

你这样做的目的是什么?

 

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

 

举例说明要判断那两个日期,最后要得到什么结果。


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


加好友 发短信
等级:幼狐 帖子:154 积分:1331 威望:0 精华:0 注册:2017/10/8 14:56:00
  发帖心情 Post By:2017/11/10 16:22:00 [只看该作者]

2003-2-10 - 2004-2-9    是365天吧 因为这个时间段没有包含2月底
2004-2-10 - 2005-2-9  是366天吧 因为这个时间段包含2月底

我现在就需要判断这个!
[此贴子已经被作者于2017/11/10 16:22:39编辑过]

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


加好友 发短信
等级:幼狐 帖子:154 积分:1331 威望:0 精华:0 注册:2017/10/8 14:56:00
  发帖心情 Post By:2017/11/10 16:25:00 [只看该作者]

也就是说我怎么判断这个时间段内有没有2月29? 
谢谢!

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


加好友 发短信
等级:婴狐 帖子:28 积分:256 威望:0 精华:0 注册:2016/11/2 10:16:00
  发帖心情 Post By:2017/11/10 16:30:00 [只看该作者]

获取两个时间的差距月数,然后再判断闰月啊

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


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

代码没问题啊

 

Dim d1 as date = "2003-2-10"
Dim d2 As Date = "2004-2-9"
Dim sp As TimeSpan = d2-d1
msgbox(sp.TotalDays+1)

Dim d3 As Date = "2004-2-10"
Dim d4 As Date = "2005-2-9"
Dim sp2 As TimeSpan = d4-d3
msgbox(sp2.TotalDays+1)


 回到顶部