共用方式為


AllViews 物件 (存取)

AllViews 集合包含 CurrentDataCodeData 物件中每個檢視的 AccessObject

註解

CurrentDataCodeData 物件具有一 AllViews 集合,該集合包含描述由 CurrentDataCodeData 指定的所有檢視範例的 AccessObject 物件。 例如,可以在 Visual Basic 中列舉 AllViews 集合來設定或傳回該集合中個別 AccessObject 物件的屬性值。

依名稱參照物件,或參照集合內的索引,以參照 AllViews 集合中的個別 AccessObject 物件。 如果要參照 AllViews 集合中的特定的物件,利用名稱參照檢視會更好,因為檢視的集合索引可能會變更。

AllViews 集合的索引是從零開始。 如果您依索引參照檢視,則第一個檢視是 AllViews (0) ,第二個檢視是 AllViews (1) ,依此類推。

注意事項

若要列出資料庫中所有開啟的檢視,請使用 AllViews 集合中每個 AccessObject 物件的 IsLoaded 屬性。 然後,您可以使用每個個別 AccessObject 物件的 Name 屬性來傳回視圖的名稱。

無法從 AllViews 集合中新增或刪除 AccessObject 物件。

範例

下列範例列印在 AllViews 集合中每個開啟的 AccessObject 物件名稱。

Sub AllViews() 
    Dim obj As AccessObject, dbs As Object 
    Set dbs = Application.CurrentData 
    ' Search for open AccessObject objects in AllViews collection. 
    For Each obj In dbs.AllViews 
        If obj.IsLoaded = True Then 
            ' Print name of obj. 
            Debug.Print obj.Name 
        End If 
    Next obj 
End Sub

屬性

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應