取消链接子表单

时间:2014-12-27 08:10:02

标签: vba ms-access-2010

我创建了一个数据库,其中包含大量子表单,这些子表单位于一个主表单中的各个选项卡上。在我看来,所有这些链接的子表单都导致数据库过慢。我想知道在这种情况下是否可以在不使用子表单时取消链接?这会改善数据库的性能吗?如果是这样,这是怎么做到的?下面是一些关于如何在输入选项卡时链接子表单但是想知道哪些代码将在“取消激活”事件上取消链接这些表单的代码。

Private Sub Form_Click()


    Form_frmValueChain01.Form.frmValueChain071.LinkMasterFields = "txtMicroProcess01f"
    Form_frmValueChain01.Form.frmValueChain071.LinkChildFields = "ID"

    Form_frmValueChain01.Form.frmValueChain14.LinkMasterFields = "txtMicroProcess01f"
    Form_frmValueChain01.Form.frmValueChain14.LinkChildFields = "subprocessID"

    Form_frmValueChain01.Form.frmValueChain10c.LinkMasterFields = "txtMicroProcess01f"
    Form_frmValueChain01.Form.frmValueChain10c.LinkChildFields = "ID"

    Form_frmValueChain01.Form.frmValueChain101.LinkMasterFields = "txtMicroProcess01f"
    Form_frmValueChain01.Form.frmValueChain101.LinkChildFields = "ID"

End Sub

1 个答案:

答案 0 :(得分:1)

在未显示子窗体时,将子窗体从控件中分离出来可能会更有效率。

假设正在从主表单执行代码,frmValueChain10c是子表单控件的名称及其引用的子表单:

frmValueChain10c.SourceObject = ""                  ' To detach

frmValueChain10c.SourceObject = "frmValueChain10c"  ' To reattach

类似于其他子表单,只要主表单的选项卡控件更改选项卡或主表单关闭。