Объект AllModules (Access)

Коллекция AllModules содержит объект AccessObject каждого модуля в объекте CurrentProject или CodeProject .

Примечания

Объект CurrentProject или CodeProject содержит коллекцию AllModules , содержащую объекты AccessObject , которые описывают экземпляры всех объектов Module , указанных в CurrentProject или CodeProject. Например, можно перечислить коллекцию AllModules в Visual Basic, чтобы установить или вернуть значения свойств отдельных объектов AccessObject в коллекции.

Ссылайтесь на отдельный объект AccessObject в коллекции AllModules , ссылаясь на объект по имени или на его индекс в семействе. Если вы хотите сослаться на определенный объект в коллекции AllModules , лучше ссылаться на модуль по имени, поскольку индекс коллекции модуля может измениться.

Коллекция AllModules индексируется, начиная с нуля. Если вы ссылаетесь на модуль по его индексу, первый модуль — AllModules(0), второй модуль — AllModules(1) и так далее.

Примечание.

Чтобы получить список всех открытых модулей в базе данных, используйте свойство IsLoaded каждого объекта AccessObject в коллекции AllModules . Затем можно использовать свойство Name каждого отдельного объекта AccessObject , чтобы вернуть имя модуля.

Невозможно добавить или удалить объект AccessObject из коллекции AllModules .

Пример

В следующем примере выводится имя каждого открытого объекта AccessObject в коллекции AllModules .

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

Свойства

• Application
• Count
• Item
• Parent

См. также

• Справочник по объектной модели Access

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.