I have a couple area based shapefiles that I would like to render with a hatch style and gradient style instead of a solid color. In the code below I have tried using the GeoHatchBrush and the AreaStyleAdvanced objects to accomplish the Hatch Style but I'm not sure how to add this style to the zoom level. When I try to add it to the CustomStyles colllection off of the zoom level it won't take it and throws a compiler error.
Dim MyAreaStyle As New AreaStyleAdvanced()
Dim MyHatchBrush As New GeoHatchBrush(GeoHatchStyle.Percent20, GeoColor.SimpleColors.Black, GeoColor.SimpleColors.Green)
MyAreaStyle.FillCustomBrush = MyHatchBrush
worldLayer.ZoomLevelSet.ZoomLevel01.CustomStyles.Add(MyAreaStyle)
Where should I be setting the style if the CustomStyles collection won't work?
Thanks