Объект AllDatabaseDiagrams (Access)
Коллекция AllDatabaseDiagrams содержит объект AccessObject для каждой схемы базы данных в объекте CurrentData или CodeData .
Замечания
Объект CurrentData или CodeData содержит коллекцию AllDatabaseDiagrams , содержащую объекты AccessObject , описывающие экземпляры всех схем баз данных, указанных в CurrentData или CodeData. Например, можно перечислить коллекцию AllDatabaseDiagrams в Visual Basic, чтобы задать или вернуть значения свойств отдельных объектов AccessObject в коллекции.
Ссылка на отдельный объект AccessObject в коллекции AllDatabaseDiagrams либо путем ссылки на объект по имени, либо путем ссылки на его индекс в коллекции. Если вы хотите ссылаться на конкретный объект в коллекции AllDatabaseDiagrams , лучше ссылаться на схему базы данных по имени, так как индекс коллекции схемы базы данных может измениться.
Коллекция AllDatabaseDiagrams индексируется с нуля. Если вы ссылаетесь на схему базы данных по ее индексу, первая схема базы данных — AllDatabaseDiagrams(0), вторая — AllDatabaseDiagrams(1) и т. д.
Примечание.
Невозможно добавить или удалить объект AccessObject из коллекции AllDatabaseDiagrams .
Пример
В следующем примере выводится имя каждого открытого объекта AccessObject в коллекции AllDatabaseDiagrams .
Sub AllDatabaseDiagrams()
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentData
' Search for open AccessObject objects in
' AllDatabaseDiagrams collection.
For Each obj In dbs.AllDatabaseDiagrams
If obj.IsLoaded = True Then
' Print name of obj.
Debug.Print obj.Name
End If
Next obj
End Sub
Свойства
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.
Обратная связь
https://aka.ms/ContentUserFeedback.
Ожидается в ближайшее время: в течение 2024 года мы постепенно откажемся от GitHub Issues как механизма обратной связи для контента и заменим его новой системой обратной связи. Дополнительные сведения см. в разделеОтправить и просмотреть отзыв по