Access) (AllViews 物件
AllViews集合包含CurrentData或CodeData物件中每個檢視的AccessObject。
註解
CurrentData 或 CodeData 物件具有一 AllViews 集合,該集合包含描述由 CurrentData 或 CodeData 指定的所有檢視範例的 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 支援與意見反應。