Свойство EventList. Count (Visio)EventList.Count property (Visio)

Возвращает количество объектов в коллекции.Returns the number of objects in a collection. Только для чтения.Read-only.

СинтаксисSyntax

Expression. Count (количество )expression.Count

Expression (выражение ) Переменная, представляющая объект EventList .expression A variable that represents an EventList object.

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

Целое числоInteger

ПримерExample

В этом макросе Microsoft Visual Basic для приложений (VBA) показано, как использовать свойство Count для выполнения итерации по коллекции документов .This Microsoft Visual Basic for Applications (VBA) macro shows how to use the Count property to iterate through a Documents collection. В нем отображаются имена всех открытых документов Microsoft Visio в окне интерпретации.It displays the names of all the open Microsoft Visio documents in the Immediate window.

 
Public Sub Count_Example() 
 
 Dim intCounter As Integer 
 Dim vsoDocument As Visio.Document 
 
 For intCounter = 1 To Documents.Count 
 'Get the next open document. 
 Set vsoDocument = Documents.Item(intCounter) 
 
 'Print its name in the Immediate window. 
 Debug.Print vsoDocument.Name 
 Next intCounter 
 
End Sub

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

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи?Have questions or feedback about Office VBA or this documentation? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.