更改Access的“导航控制”上的导航选项卡？

Question

这是我的疑问，我有一个名为“navControl”的导航控件，它有三个标签（“Venda”，“Metalização”，“Injeção”），我有一个带有三个选项的复选框，我需要根据需要更改标签选定的选项。

我想我需要使用DoCmd.BrowseTo，但不知道如何：/

有人可以帮帮我吗？感谢

Answer 1

您必须将导航目标名称设置为每个导航选项卡在导航控件的“属性/数据”选项卡中打开的表单名称。

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