AllModules 对象 (Access)

AllModules 集合包含 AccessObject当前项目 中每个模块的 或 CodeProject 对象。

备注

当前项目CodeProject 对象具有 AllModules 集合,该集合包含描述指定的 当前项目CodeProject模块 对象的实例的 AccessObject 对象。 例如,您可以枚举 AllModules 集合在 Visual Basic 来设置或返回该集合中的单个 AccessObject 对象的属性的值。

通过按名称引用对象或引用其集合中的索引来引用 AllModules 集合中的单个 AccessObject 对象。 如果要引用 AllModules 集合中特定的对象,最好到模块名称引用,因为模块的集合索引可能会更改。

AllModules 集合进行索引从零开始的索引。 如果您引用模块通过其索引,第一个模块是 AllModules(0),第二个模块是 AllModules(1),依此类推。

注意

[!注释] 若要列出数据库中所有打开的模块,请使用 IsLoadedAllModules 集合中的每个 AccessObject 对象的属性。 然后,可以使用 名称 返回模块的名称,每个 AccessObject 对象的属性。

您不能添加或从 AllModules 集合中删除一个 AccessObject 对象。

示例

下面的示例打印 AllModules 集合中每个打开的 AccessObject 对象的名称。

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

属性

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。