Access判断窗体是否打开

在Access窗体中，我们如果需要修改数据，都会创建一个修改窗体。一般不会直接操作子窗体，防止数据误操作。

在数据修改完毕后，希望刷新查询窗体的子窗体，立刻显示修改后的数据。首先我们需要判断该查询窗体是否有打开。

在旧版的Access中，可能要自定义一个判断窗体是否打开的函数，但是新版的Access中，有AccessObject.IsLoaded 属性，可以确定当前是否加载了 AccessObject。

如下图，判断“窗体1”是否有打开

详细源码：

Private Sub Command0_Click()
    If CurrentProject.AllForms("窗体1").IsLoaded = True Then
        
        MsgBox "窗体已加载"
    Else
        MsgBox "窗体未被加载"
    End If
End Sub