Access (AllQueries 物件)
AllQueries 集合包含 CurrentData 或 CodeData 物件中每個查詢的 AccessObject 。
CurrentData 或 CodeData 物件都有 AllQueries 集合包含說明 CurrentData 或 CodeData 所指定的所有查詢執行個體的 AccessObject 物件。 例如,您可以列舉 AllQueries 集合在 Visual Basic 中設定或傳回集合中個別的 AccessObject 物件的屬性的值。
參照AllQueries集合中的個別AccessObject物件,方法是依名稱參照物件,或參照集合中的索引。 如果您想要在 AllQueries 集合中特定的物件參照,最好是因為查詢集合索引可能會變更依名稱參照到查詢。
AllQueries 集合是從零開始編列索引。 如果您依其索引參照查詢,第一個查詢是 AllQueries(0)、 第二個查詢是 AllQueries(1),依此類推。
注意
若要列出資料庫中所有開啟的查詢,請使用AllQueries集合中每個AccessObject物件的IsLoaded屬性。 然後,您可以使用每個個別AccessObject物件的Name屬性來傳回查詢的名稱。
無法從 AllQueries 集合中新增或刪除 AccessObject 物件。
下列範例列印在 AllQueries 集合中每個開啟的 AccessObject 物件的名稱。
Sub AllQueries()
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentData
' Search for open AccessObject objects in AllQueries collection.
For Each obj In dbs.AllQueries
If obj.IsLoaded = True Then
' Print name of obj.
Debug.Print obj.Name
End If
Next obj
End Sub
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。