Dim pMarker As IMarkerSymbol Do Until pStyleItem Is Nothing If pStyleItem.Name = "Star 1" Then pMarker = pStyleItem.Item pMarker.Size = 12 pMarker.Color = pColor Exit Do End If pStyleItem = pEnumMarkers.Next Loop Dim prenderer As ISimpleRenderer prenderer = New SimpleRenderer prenderer.Symbol = pMarker
Solved! Go to Solution.