根据数据表内容显示选项卡

时间:2018-05-03 01:52:36

标签: vba ms-access

我有一个带Tab控件的表单。在每个选项卡中都有一个子窗体链接到主窗体上的主字段。我希望将标签设置为仅在其包含的数据表具有值时才可见。

例如,主窗体主字段是一个框号,如果该框中包含错误,它将填充在选项卡控件中的三个子窗体之一上。

我不希望检查每个标签,而是只有在列出相应的错误时才能看到它。

TabControl

1 个答案:

答案 0 :(得分:2)

虽然这个问题有点宽泛,但可以通过每页一行实现:

Private Sub Form_Current()
    Me![NameOfSomePage].Visible = Not Me![NameOfSubformOnThatPage].Form.RecordSet.RecordCount = 0
End Sub

说明:

Form_Current:每当主窗体上的记录发生更改时发生的事件

Me![NameOfSomePage].Visible =:将某个页面的可见性设置为

Not:True为False,False为True

Me![NameOfSubformOnThatPage].Form.Recordset.RecordCount = 0:检查某个子表单的基础记录集是否包含0条记录

请注意,如果显示0页,整个标签控件也会消失。