测试控件/字段是否在可见选项卡上 ms Access

如何解决测试控件/字段是否在可见选项卡上 ms Access

我有一个 MS Access 表单，其中包含组织成选项卡的各种控件。其中有一些文本字段，我需要在打开它们的选项卡时更新文本字段（即 vba 来更新它们）。文本字段未绑定，更新更个性化。

我已经尝试了下面的代码，但对于不在可见选项卡上的文本字段，它返回 True

Private Sub TabCtl2_Change()
Dim Ctl As Control
For Each Ctl In Me.Form.Controls
    If Ctl.ControlType = acTextBox Then
'Want to do stuff here
    Debug.Print Ctl.Visible 'This is returning 'True' for all text fields 
                            'not just the ones on the active tab.
    Debug.Print Ctl.Name
    End If
Next

End Sub

据我所知，Tab 对象没有 Controls 集合或任何您称之为的集合。有人可以帮助我如何循环浏览选项卡上的控件吗？如果我能帮上忙，我不想手动编写所有代码。

解决方法

tabcontrol 中 Page 集合中的 Pages 对象确实具有 Controls 属性。

这意味着，如果你想对活动页面上的所有控件做一些事情，你可以使用以下内容：

For Each control In Me.MyTabcontrol.Pages(Me.MyTabcontrol.Value).Controls
    'Do Stuff
Next