Свойство Pages.Item (Visio)
Возвращает элемент из коллекции. Свойство Item является свойством по умолчанию для всех коллекций. Только для чтения.
Синтаксис
expression. Item (NameUIDOrIndex)
Выражение Переменная, представляющая объект Pages .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
NameUIDOrIndex | Обязательный | Variant | Содержит имя, уникальный идентификатор или индекс извлекаемого объекта. |
Возвращаемое значение
Page
Замечания
При извлечении объектов из коллекции можно опустить Item из выражения, так как это свойство по умолчанию для всех коллекций. Приведенные ниже инструкции эквивалентны приведенному выше примеру синтаксиса:
objRet = object(index)
objRet = object(stringExpression)
Объект можно получить в коллекции Addons, Documents, Fonts, Hyperlinks, Layers, Masters, MasterShortcuts, OLEObjects, Pages, Shapes или Styles , передав имя объекта в виде строкового выражения в Variant.
Дополнительные сведения о передаче строк идентификатора в свойство Item см. в разделе, посвященном свойству UniqueID в этом справочнике.
Примечание.
Начиная с Microsoft Visio 2000, вы можете использовать локальные и универсальные имена для ссылки на фигуры Visio, образцы, документы, страницы, строки, надстройки, ячейки, гиперссылки, стили, шрифты, основные сочетания клавиш, объекты пользовательского интерфейса и слои. Например, когда пользователь присваивает имя фигуре, пользователь указывает локальное имя. Начиная с Microsoft Office Visio 2003 электронная таблица shapesheet отображает только универсальные имена в формулах и значениях ячеек. (В предыдущих версиях универсальные имена не отображались в пользовательском интерфейсе.)
Как разработчик, вы можете использовать универсальные имена в программе, если вы не хотите изменять имя каждый раз, когда решение локализуется. Используйте свойство Item для доступа к объекту в коллекции Master, Pages, Shapes, Styles, Layers или MasterShortcuts , используя его локальное имя. Используйте свойство ItemU для доступа к объекту из одной из этих коллекций, используя универсальное имя объекта.
Если решение Visual Studio содержит ссылку microsoft.Office.Interop.Visio , это свойство сопоставляется со следующими типами:
- Microsoft.Office.Interop.Visio.IVPages.this[object]
Пример
Этот макрос Microsoft Visual Basic для приложений (VBA) показывает, как использовать свойство Item для получения объекта Page из коллекции Pages активного документа и всех объектов Shape в коллекции Shape объектаPage. Он выводит имена всех фигур на странице Page1 в окне Интерпретация.
Перед выполнением этого макроса убедитесь, что активный документ содержит фигуры на странице Page1.
Public Sub Item_Example()
Dim intCounter As Integer
Dim intShapeCount As Integer
Dim vsoShapes As Visio.Shapes
Set vsoShapes = ActiveDocument.Pages.Item(1).Shapes
Debug.Print "Shape Name List For..."
Debug.Print "Document: "; ActiveDocument.Name
Debug.Print "Page: "; ActiveDocument.Pages.Item(1).Name
intShapeCount = vsoShapes.Count
If intShapeCount > 0 Then
For intCounter = 1 To intShapeCount
Debug.Print " "; vsoShapes.Item(intCounter).Name
Next intCounter
Else
Debug.Print " No Shapes On Page"
End If
End Sub
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.