请教这个workdays的代码

andymark · 发表于 2008-3-25 14:37:47

贴出的代码部分乱码，请修正一下

andymark · 发表于 2008-3-25 15:55:50

因为根本就没查到数据，返回值为0, newNetWorkDays = IntDays - 1
上面语句查询天为0时返回结果为-1

andymark · 发表于 2008-3-25 15:56:33

你举个例子就行吧

andymark · 发表于 2008-3-25 16:05:44

把参数改为：
Do While DateCnt < EndDays

datecnt是最小的日期，enddays的最大的日期

andymark · 发表于 2008-3-25 16:06:33

同时删除下面这句话
newNetWorkDays = IntDays - 1

andymark · 发表于 2008-3-25 16:08:01

如果看不明白，或者返回错误结果的，建议上传例子

andymark · 发表于 2008-3-25 16:51:02

Expr1: IIf([enddate]>=[date],Works_Days([date],[enddate]),Works_Days([enddate],[date]))

帐号		自动登录	找回密码
密码			注册

[模块/函数] 请教这个workdays的代码

群介绍
主题无相 (随机显示版	同地区群块其他地区)