<<< 返回 access911.net 编程静态资料库索引页

如何确定某年第N周的第一天日期?

 

作者:cg1  摘自:access911.net  录入:cg1  时间:2005-4-8  浏览人次:670


专题地址:http://access911.net/fixhtm/72FAB01E17DCEBF3.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:如何确定某年第N周的第一天日期?《函数》

 


问题:

如何确定某年第N周的第一天日期?
要知道 2005 年 第40周的第一天的日期是多少,该如何做?

 

回答:

Function WeekFistDateInYear(ByVal lngWeek As Long, _
                            ByVal dteA As Date, _
                            Optional ByVal bteFirstDay As Byte) As Date
    '本函数获取某年的第N周的第一天
    '其实可以直接合并为一个公式,无需另外写公式

    Dim dte As Date
    dte = DateAdd("ww", lngWeek, dteA)
    WeekFistDateInYear = DateAdd("d.....................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/72FAB01E17DCEBF3.htm

 


上一篇:如何使本机时间与服务器时间同步?

下一篇:如何得到字串的真实长度,中文算2个字符,英文算1个

2017年2月22日生成静态资料