Метод ContainerProperties.GetMemberShapes (Visio)
Возвращает идентификаторы фигур (идентификаторы) всех элементов контейнера, как указано.
Синтаксис
expression. GetMemberShapes (ContainerFlags)
Выражение Переменная, представляющая объект ContainerProperties .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
ContainerFlags | Обязательный | Long | Указывает, какие идентификаторы фигур-членов контейнера следует возвращать. |
Возвращаемое значение
Long()
Замечания
Параметр ContainerFlags может быть одной или несколькими из следующих констант VisContainerFlags .
Константа | Значение | Описание |
---|---|---|
visContainerFlagsDefault | 0 | Возвращает все типы фигур и включает элементы во вложенные контейнеры. |
visContainerFlagsExcludeContainers | 1 | Исключает фигуры элементов, которые являются контейнерами. |
visContainerFlagsExcludeConnectors | 2 | Исключает фигуры элементов, которые являются соединителями. |
visContainerFlagsExcludeCallouts | 4 | Исключает фигуры членов, которые являются выносками. |
visContainerFlagsExcludeElements | 8 | Исключает фигуры элементов, которые не являются контейнерами, списками, соединителями или выносками. |
visContainerFlagsExcludeNested | 16 | Исключает все фигуры элементов, которые являются элементами контейнеров или списков, вложенных в контейнер. |
visContainerFlagsExcludeListMembers | 32 | Исключает члены контейнера списка, которые явно являются членами любого списка. Не исключает другие фигуры в контейнере списка. |
GetMemberShapes возвращает пустой массив, если фигуры-члены отсутствуют.
Пример
В следующем примере Visual Basic для приложений (VBA) показано, как использовать метод GetMemberShapes для получения идентификаторов всех фигур-членов в указанном контейнере на активной странице, циклического просмотра этих фигур и печати идентификаторов каждой фигуры в окне Интерпретация.
For Each memberID In vsoContainerShape.ContainerProperties.GetMemberShapes(visContainerFlagsDefault)
Set vsoShape = ActivePage.Shapes.ItemFromID(memberID)
Debug.Print vsoShape.ID
Next
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.