Freigeben über


Application.PersistsEvents-Eigenschaft (Visio)

Gibt an, ob ein Objekt in der Lage ist, persistente Ereignisse in seiner EventList-Auflistung zu enthalten. Schreibgeschützt.

Syntax

Ausdruck. PersistsEvents

expression Eine Variable, die ein Application-Objekt darstellt.

Rückgabewert

Ganze Zahl

Hinweise

Jedes Objekt, das über eine EventList-Eigenschaft verfügt, verfügt auch über eine PersistsEvents-Eigenschaft. Um dauerhaft zu sein, muss der Aktionscode des Ereignisses visActCodeRunAddon sein, aber er muss sich auch in der EventList-Auflistung eines Objekts befinden, deren PersistsEvents-Eigenschaft True ist. Die einzigen aktuell dauerhaften Ereignisse sind die Objekte Document, Master und Page.

Ob ein Ereignis, das dauerhaft sein kann, tatsächlich dauerhaft ist, hängt vom Wert von dessen Persistent-Eigenschaft ab.

Beispiel

Dieses VBA-Makro (Microsoft Visual Basic for Applications) zeigt, wie die PersistsEvents-Eigenschaft verwendet wird, um zu bestimmen, ob ein Objekt persistente Ereignisse enthalten kann. Beim Ausführen des Makros werden 1 (True), 1 (True) und 0 (False) im Direktfenster für die Document-, Page- und Window-Objekte ausgegeben.

 
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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.