Access 2007条件日期格式

Question

我有一个Access 2007数据库，表单上有一个日期字段。此字段是员工的联系开始日期。示例：05年5月16日

我希望此字段在合约开始日期月份+一个月内显示红色文字。

因此，在这个例子中，“6月1日（每年）”到“6月30日（每年）”的“2005年5月16日”字段将显示红色文字。

Answer 1

在单个表单中，您可以使用表单的“当前事件”来设置背景颜色和各种字体属性。

Private Sub Form_Current()

If Me.ADate > #1/1/2011# And Me.ADate < #1/31/2012# Then
    Me.ADate.BackColor = vbRed
Else
    Me.ADate.BackColor = vbWhite
End If

End Sub

您可能还希望将代码添加到After Update事件中。