Свойство Shapes.PersistsEvents (Visio)

Статья
04/07/2023

Указывает, может ли объект содержать постоянные события в коллекции EventList . Только для чтения.

Синтаксис

expression. PersistsEvents

выражение: переменная, представляющая объект Shapes.

Возвращаемое значение

Целое число

Замечания

Каждый объект со свойством EventList также имеет свойство PersistsEvents . Чтобы быть сохраняемым, код действия события должен быть visActCodeRunAddon, но он также должен находиться в коллекции EventList объекта, свойство Которого PersistsEvents имеет значение True. Единственными объектами, которые в настоящее время сохраняют события, являются объекты Document, Master и Page .

Действительно ли сохраняемое событие сохраняется, зависит от значения его свойства Persistent .

Пример

В этом макросе Microsoft Visual Basic для приложений (VBA) показано, как использовать свойство PersistsEvents, чтобы определить, может ли объект содержать постоянные события. При выполнении макроса в окне Интерпретация отображаются значения 1 (True), 1 (True) и 0 (False) для объектов Document, Page и Window соответственно.

 
Public Sub PersistsEvents_Example() 
 
 Dim vsoDocument As Visio.Document 
 
 Set vsoDocument = Documents.Add("") 
 Debug.Print vsoDocument.PersistsEvents 
 Debug.Print ActivePage.PersistsEvents 
 Debug.Print ActiveWindow.PersistsEvents 
 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через