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

作者：  摘自：  录入：cg1  时间：2003-9-10  浏览人次：1306

专题地址：http://www.access911.net/index.asp?u1=a&u2=78FAB01E1BDC 如果需要更详细的评论或说明，请点击该地址。

简述：

函数：

Public Function BusinessDateDiff(ByVal dDate1 As Date, ByVal dDate2 As Date) As Long 

该函数的功能是计算两个日期（dDate1和dDate2）之间的工作日。下面的这些属性允许你对计算实施控制，告诉程序如何进行计算。

属性

Public IncludeSaturdays As Boolean

当值为真，计算时将包括星期六，否则将星期六排除在外。

Public IncludeSundays As Boolean

当值为真，计算时将包括星期日，否则将星期日排除在外。

Public Property Let IncludeFirstDate(bInc As Boolean) Public Property 
Get IncludeFirstDate() As Boolean

在默认情况下，BusinessDateDiff函数会将你输入的起始日包括在计算中，但不包括你输入的终止日。将该属性值设为假，计算时就不包括你输入的起始日。

Publi.....................
...........