Access判斷數據庫對象是否打開

2019-01-12 14:25:00
tmtony8
原創
969

在Access中程序設計中,在以編程方式編輯該對象之前,通常需要瞭解特定數據庫對象是否打開

以下示例用 acSysCmdGetObjectState 操作使用 SysCmd 方法來確定數據庫對象是否打開。


函數 IsObjectLoaded 有兩箇蔘數。strObjectName 蔘數是檢查的數據庫對象的名稱。strObjectType 蔘數是一箇 AcObjectType 常量,用於指定要檢查的數據庫對象的類型。如果指定的數據庫對象打開,則 IsObjectLoaded 函數返迴 True;如果該對象未打開,則返迴 False。

詳細源碼:
Function IsObjectLoaded(ByVal strObjectName As String, ByVal strObjectType As AcObjectType) As Boolean
    
    If SysCmd(acSysCmdGetObjectState, strObjectType, strObjectName) <> 0 Then
        
       ' The object is open.
        IsObjectLoaded = True
    Else

       ' The object is not open.
        IsObjectLoaded = False
    End If
    
End Function


調用該函數

If IsObjectLoaded("關於", acForm) = True Then MsgBox "窗體已打開"


    分享