【发布时间】:2019-10-08 18:11:16
【问题描述】:
我有一个显示在报告上的“订购日期”字段,如果该日期超过 3 个工作日,我希望该日期显示为红色。我见过几个不同的代码,但它们很长,我不知道如何将它们应用到我的报告甚至查询中。我相信我的数据库将星期日作为一周的第一天。很想理解这一点,因为我有其他报告我也想应用它。我没有接受过正式的访问培训。非常感谢您的帮助。
【问题讨论】:
标签: ms-access-2010
我有一个显示在报告上的“订购日期”字段,如果该日期超过 3 个工作日,我希望该日期显示为红色。我见过几个不同的代码,但它们很长,我不知道如何将它们应用到我的报告甚至查询中。我相信我的数据库将星期日作为一周的第一天。很想理解这一点,因为我有其他报告我也想应用它。我没有接受过正式的访问培训。非常感谢您的帮助。
【问题讨论】:
标签: ms-access-2010
没有短或钝的代码,如果应该考虑假期,确实没有。
一个例子是我的函数:DateDiffWorkdays。
但是,您只需将完整代码复制粘贴到新模块中,然后编译并保存即可。
然后,要检查,请在报告的 Details 部分的 Format 事件中使用与此类似的表达式:
Private Sub Detailsection_Format(Cancel As Integer, FormatCount As Integer)
Me!YourTextbox.ForeColor = IIf(DateDiffWorkdays([OrderDate],Date()) > 3, vbRed, vbBlack)
End Sub
【讨论】: