以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  怎样给日期加上指定的工作日呢  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=115851)

--  作者:Hareen时代
--  发布时间:2018/3/15 16:28:00
--  怎样给日期加上指定的工作日呢
狐表怎样实现给日期加上指定的工作日呢?比如说2018-3-15  ,加上四个工作日,不包括3.17,3.18   ,加完的结果是2018-3-21
--  作者:狐说八道
--  发布时间:2018/3/15 16:37:00
--  

Dim d As Date = #2/28/2008#
Dim
d1 As Date = d.
AddDays(40) \'加上40天


--  作者:Hareen时代
--  发布时间:2018/3/15 16:38:00
--  
是加上工作日,不包括周六日和节假日,这个不太符合
--  作者:有点甜
--  发布时间:2018/3/15 16:47:00
--  

这样,你就需要做一个节假日表,参考这个实例

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=108654&skin=0

 


--  作者:Hareen时代
--  发布时间:2018/3/15 17:13:00
--  
喔喔,好的,多谢,我先看看!