我的主表单可以控制未链接的子表单吗？

问题描述

我有一个包含一些子表单的主表单，一个 5 天工作日日历用于安排。

我的主表单加载到本周的星期一

Private Sub Form_Load()

Dim dCurrent_Tuesday As Date
dCurrent_Tuesday = DateAdd("w",1 - Weekday(Date,vbTuesday),Date)
Me!AMaidDate.SetFocus
DoCmd.FindRecord dCurrent_Tuesday

End Sub

第一个子表单打开到本周的星期二。

Private Sub Form_Load()

Dim dCurrent_Monday As Date
dCurrent_Monday = DateAdd("w",vbMonday),Date)
Me!AMaidDate.SetFocus
DoCmd.FindRecord dCurrent_Monday
End Sub

我的主表单有一个转到下周的按钮。

Private Sub Command144_Click()

    Me!AMaidDate.SetFocus
    Dim stDate As Date
    stDate = Me!AMaidDate
    DoCmd.FindRecord stDate + 7
 
End Sub

我试图让我的主表单使用相同的按钮控制子表单。如果我将主字段和子字段链接为 AMaidDate，我只能让它这样做。但是，当我这样做时，子表单不再有自己的日期和 ID，而是采用主表单的日期和 ID。有没有办法做到这一点？我试过把我的日期代码放在更改中，但我所做的也没有在那里工作。我想我应该对 5 个工作日进行查询，但我不知道如何去做。任何建议将不胜感激。谢谢。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

ms-access-2013 subform