Метод возвращает число элементов, входящий в набор LineStyleElements.
Visual Basic:
Property Count() As Long
read only
Sub A_count Set L = Zulu.ActiveMapDoc.Layers.Active 'объекту lsd присваиваем стиль линии по ID 85 Set lsd = L.LineStyles.ItemById(85) ' объекту lses присваиваем объект LineStyleElements Set lses = lsd.StyleElements ' для проверки выводим число элементов в наборе lses MsgBox(lses.Count) End Sub