在导航表单中的子表单之间切换

Question

我一直在寻找似乎是一个简单问题的时间，所以，我会在这里问。在MS Access中使用导航表单，尝试在VBA中的导航按钮/选项卡之间切换以搜索要添加到项目中的资产。

我有一个带有许多导航按钮的导航表单，其中包括btnUpdateProject和（隐藏的）btnSearch。 btnUpdateProject有一个名为ProjectIndex的子窗体，带有btnSearchForAsset按钮（因此我可以搜索我希望添加到项目中的资产）。我有VBA代码：

Private Sub btnSearchForAsset_Click()
    Me.Parent!btnSearch.Visible = True
    Me.Parent!btnSearch.SetFocus
End Sub

根据第一个命令，btnSearch变为可见；但是，重点仍然放在btnUpdateProject上。如何使btnSearchForAsset成为焦点？非常感谢您的帮助！

Answer 1

首先，您必须导航到表单页面，然后将焦点设置为按钮。

Me.TabCtl1.Pages(1).SetFocus ; This will set focus on the Navigation page 
Me.Parent!btnSearch.Visible = True
Me.Parent!btnSearch.SetFocus