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