Возвращает стиль линии в виде объекта LineStyleDef по ID стиля в коллекции.

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

LineStyles

Синтаксис:

Visual Basic:

Property ItemById(StyleID As Long) As LineStyleDef

read-only

StyleID - ID стиля.

Пример:

Dim Lsd As LineStyleDef

'Получаем стиль линии активного слоя карты c ID = 1
Set Lsd = MapCtrl1.Map.Layers.Active.LineStyles.ItemById(1)

'Проверяем результат
If  Lsd.Id  = -1 Then
   MsgBox "Стиль не найден" 
End If