Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]周次求日期


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

主题：[求助]周次求日期
帅哥哟，离线，有人找我吗？
qwz405
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：525 积分：5072 威望：0 精华：0 注册：2015/4/15 15:25:00 		[求助]周次求日期  发帖心情 Post By：2016/4/26 11:02:00 [只看该作者]

是否有函数，可以计算给定周次相对应的日期。

例如: 
已知：2016年第18周，
需要获得：此周的第一天是2016-04-24，当然也就知道周一、二……
 回到顶部
帅哥哟，离线，有人找我吗？
包头123
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1049 积分：8150 威望：0 精华：0 注册：2011/10/11 11:13:00 		  发帖心情 Post By：2016/4/26 11:08:00 [只看该作者]

好问题，将来狐表应该提供一个。

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


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

参考代码

 

Dim y As Integer = 2016
Dim w As Integer = 18
Dim start As Date = new Date(y, 1, 1)
start = start.AddDays(-start.DayOfWeek)
start = start.AddDays(7*(w-1))
msgbox(start)
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03516 秒, 4 次数据查询