Свойство EventList.Count (Visio)
Возвращает количество объектов в коллекции. Только для чтения.
Синтаксис
выражения. Count
выражение Переменная, представляюная объект EventList .
Возвращаемое значение
Целое число
Пример
Этот макрос Visual Basic для приложений (VBA) показывает, как использовать свойство Count для итерации через коллекцию документов. В нем отображаются имена всех открытых документов Microsoft Visio в непосредственном окне.
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
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.