gpt4 book ai didi

ms-access - 导航到导航子表单中的不同选项卡

转载 作者:行者123 更新时间:2023-12-01 12:57:08 25 4
gpt4 key购买 nike

在 ms access 2010 数据库中,我有一个列表框,其更新后过程需要(除其他事项外)导航到导航子表单中的特定选项卡。我可以用它来更改导航子窗体的 SourceObject 属性,但所选选项卡不会更改,因此用户最终会看到正确的源对象,但选择了错误的选项卡。这看起来不专业。如何更改所选选项卡和源对象?

我将重现问题的简化数据库上传到 this file sharing site .

需要更改其 afterupdate 方法的列表框称为 lstbxClients。这是我目前的 afterupdate 方法草稿,目前正在抛出一个错误:

Private Sub lstbxClients_AfterUpdate()
Dim rst
Set rst = Me.RecordsetClone
rst.FindFirst "ClientNumber = " & lstbxClients.Column(0)
Me.Bookmark = rst.Bookmark
'Forms!Main!NavigationSubform.Form!NavigationSubform.SourceObject = "qryListCommunicationForms"
DoCmd.BrowseTo acBrowseToForm, "qryListCommunicationForms", "Forms!Main!NavigationSubform.Form!NavigationSubform"
Form.NavigationSubform " "
'Forms!Main!NavigationSubform.Form!NavigationSubform.SelectedTab = "CommFormsNavBtn"
Set rst = Nothing
End Sub

如何更改上面的代码,以便在用户单击列表框中的不同记录时,它同时更改选定的选项卡和导航子表单的源对象?

最佳答案

Access 对路径的正确语法给出了相对体面的解释。

Path argument is of the form: MainForm1.Subform1>Form1.Subform1

因此您的 BrowseTo 命令应该如下所示:

DoCmd.BrowseTo acBrowseToForm, "qryListCommunicationForms", "Main.NavigationSubform>FindClientsNavigation.NavigationSubform"

关于ms-access - 导航到导航子表单中的不同选项卡,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/20366387/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com