更改 Access "Navigation Control" 上的导航选项卡?
Change navigation tab on "Navigation Control" of Access?
这是我的疑问,我有一个名为 "navControl" 的导航控件,它具有三个选项卡("Venda"、"Metalização"、"Injeção"),并且我有一个复选框有三个选项,我需要根据所选选项更改选项卡。
我想我需要使用 DoCmd.BrowseTo,但不知道如何使用 :/
有人可以帮助我吗?谢谢
您必须将 导航目标名称 设置为每个导航选项卡在导航控件的 Properties/Data 选项卡中打开的表单的名称。
Private Sub YourOptionGroup_Click()
With Me
Select Case .YourOptionGroup.Value
Case 1:
DoCmd.BrowseTo acBrowseToForm, "Form1", "YourMainFormName.NavigationSubform"
Case 2:
DoCmd.BrowseTo acBrowseToForm, "Form2", "YourMainFormName.NavigationSubform"
Case 3:
DoCmd.BrowseTo acBrowseToForm, "Form3", "YourMainFormName.NavigationSubform"
End Select
End With
End Sub
这是我的疑问,我有一个名为 "navControl" 的导航控件,它具有三个选项卡("Venda"、"Metalização"、"Injeção"),并且我有一个复选框有三个选项,我需要根据所选选项更改选项卡。
我想我需要使用 DoCmd.BrowseTo,但不知道如何使用 :/
有人可以帮助我吗?谢谢
您必须将 导航目标名称 设置为每个导航选项卡在导航控件的 Properties/Data 选项卡中打开的表单的名称。
Private Sub YourOptionGroup_Click()
With Me
Select Case .YourOptionGroup.Value
Case 1:
DoCmd.BrowseTo acBrowseToForm, "Form1", "YourMainFormName.NavigationSubform"
Case 2:
DoCmd.BrowseTo acBrowseToForm, "Form2", "YourMainFormName.NavigationSubform"
Case 3:
DoCmd.BrowseTo acBrowseToForm, "Form3", "YourMainFormName.NavigationSubform"
End Select
End With
End Sub