如何解决我的主表单可以控制未链接的子表单吗?
我有一个包含一些子表单的主表单,一个 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 举报,一经查实,本站将立刻删除。