Свойство возвращает количество элементов в коллекции.

Применяется к:

ElementKeyPairs

Синтаксис:

Visual Basic:

Property Count() As Long

read only

Пример:

Sub ElementKeyPairs_Count
'получаем активный слой
Set L = Zulu.ActiveMapDoc.Layers.Active
'Получаем слой, в отношении которого хотим получить кол-во вхождений объектов
Set L2 = Zulu.ActiveMapDoc.Layers.GetItemByUserName("Освещение")	
'получаем коллекцию пар ключей
set keys = L.IntersectByLayer( L2, 1, 0, -1, -1, 0)
'Выводим в сообщение кол-во таких пар
MsgBox(keys.Count)		
End Sub