Метод возвразает длину штриха линии. (только для прерывистых линий)
Visual Basic:
Function GetLineDash() As Double
Sub GetLineDash Set L = Zulu.ActiveMapDoc.Layers.Active 'объекту lsd присваиваем стиль линии по ID 85 Set lsd = L.LineStyles.ItemById(85) ' объекту lses присваиваем объект LineStyleElements Set lses = lsd.StyleElements ' объекту lse присваиваем объект LineStyleElement по индексу 1 из набора LineStyleElements Set lse = lses.Item(1) ' выводим длину штриха MsgBox(lse.GetLineDash) End Sub