Foxtable(狐表) → 用户栏目 → 专家坐堂 → 农历一年范围（不指定某一年）怎么表示


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

主题：农历一年范围（不指定某一年）怎么表示
帅哥哟，离线，有人找我吗？
jpg7
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：437 积分：3682 威望：0 精华：0 注册：2014/4/28 18:50:00 		农历一年范围（不指定某一年）怎么表示  发帖心情 Post By：2016/3/8 21:29:00 [只看该作者]

农历一年范围（不指定某一年）怎么表示

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


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2016/3/8 21:37:00 [只看该作者]

不明白你的意思，这个意思？

 

Dim nstart As New Lunar(2016,1,1,False)
Dim nend As new Lunar(2017,1,1,False)
msgbox(nstart.SolarDate & "   " & nend.SolarDate )
 回到顶部
帅哥哟，离线，有人找我吗？
jpg7
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：437 积分：3682 威望：0 精华：0 注册：2014/4/28 18:50:00 		  发帖心情 Post By：2016/3/8 21:45:00 [只看该作者]

今年的农历范围：去年年春节阳历日期（t1),今年春节的阳历日期（t2)。t>=t1 and t < t2 就是一年的农历范围啊，如果指定某一年（比如2007），那就只能表示一年。到2008年就不管用了。。。

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


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2016/3/8 22:13:00 [只看该作者]

Dim nstart As New Lunar(date.Today.Year,1,1,False)
Dim nend As new Lunar(date.Today.Year+1,1,1,False)
msgbox(nstart.SolarDate & "   " & nend.SolarDate )
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03125 秒, 4 次数据查询