子窗体默认显示当前日期的记录

Question

我有一个主窗体和一个子窗体。在主窗体中，我想有一个文本框，其中包含今天的日期(date=(((，称为txt_today。在此框的左侧和右侧，我还有另外两个命令按钮，用于下一个和上一个。我希望这些按钮txt_today更改为第二天或前一天，并在下面的子窗体中(sub_form_Dailys(返回日期。

完成此操作时，最好使用查询吗？ 即加载过滤器仅显示今天的记录，当用户单击上一个或下一个时，它会查询tbl_tasks并按字段"每日任务"进行过滤，或者我应该使用 VBA...什么方法最好？谢谢

Answer 1

可以将DefaultValue属性设置为：=Date()

按钮可以在单击事件中执行：

Me!PreviousDate.Value = DateAdd("d", -1, Date)

分别

Me!NextDate.Value = DateAdd("d", 1, Date)

要筛选子窗体，请使用主链接字段和子链接字段。

在主窗体上有一个(隐藏的(文本框，名为FilterDate，默认值为 =Date((。 然后指定：

MasterLinkFields: [FilterDate]
ChildLinkFields: [YourDateFieldOnTheSubform]

展开按钮单击事件以保存以下行：

Me!FilterDate.Value = DateAdd("d", -1, Date)

分别

Me!FilterDate.Value = DateAdd("d", 1, Date)

子窗体将自动过滤。