Объект AllViews (Access)

Коллекция AllViews содержит объект AccessObject для каждого представления в объекте CurrentData или CodeData .

Примечания

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

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

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

Примечание.

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

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

Пример

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

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 и обратная связь.