Access判斷窗體是否打開

在Access窗體中，我們?nèi)绻枰薷臄?shù)據(jù)，都會創(chuàng)建一個修改窗體。一般不會直接操作子窗體，防止數(shù)據(jù)誤操作。

在數(shù)據(jù)修改完畢后，希望刷新查詢窗體的子窗體，立刻顯示修改后的數(shù)據(jù)。首先我們需要判斷該查詢窗體是否有打開。

在舊版的Access中，可能要自定義一個判斷窗體是否打開的函數(shù)，但是新版的Access中，有AccessObject.IsLoaded 屬性，可以確定當(dāng)前是否加載了 AccessObject。

如下圖，判斷“窗體1”是否有打開

詳細源碼：

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