Radar Chart mixed properties in Circle

C#

SeriesList sList = new SeriesList();             sList.ChartType = ChartType.Radar;             Random r = new Random();             for (int i = 0; i < 4; i++)             {                 Series sr = new Series();                 sr.Points.Width = 6;                 if (i == 0) sr.Points.PointType = PointType.FillCircle;                 else if (i == 1) sr.Points.PointType = PointType.FillCircle;                 else if (i == 2) sr.Points.PointType = PointType.FillRectangle;                 else if (i == 3) sr.Points.PointType = PointType.FillTriangle;                 if (i == 0) sr.RadarType = RadarPointType.Area;                 else if (i == 1) sr.RadarType = RadarPointType.Point;                 else if (i == 2) sr.RadarType = RadarPointType.Line;                 else if (i == 3) sr.RadarType = RadarPointType.Line;                                  for (int x = 0; x < 12; x++)                 {                     SeriesItem item = new SeriesItem();                     item.YValue = r.Next(500);                     item.Name = "R" + x.ToString();                     sr.items.Add(item);                 }                 sList.SeriesCollection.Add(sr);             }             this.hHippoChart1.LegendBox.Visible = false;             this.hHippoChart1.Titles.Label.ForeColor = Color.SteelBlue;             this.hHippoChart1.DesignType = ChartDesignType.Simple;             this.hHippoChart1.SeriesListDictionary.Add(sList);             this.hHippoChart1.DrawChart();

VB

Dim sList As New SeriesList() sList.ChartType = ChartType.Radar Dim r As New Random() For i As Integer = 0 To 3     Dim sr As New Series()     sr.Points.Width = 6         If i = 0 Then         sr.Points.PointType = PointType.FillCircle     ElseIf i = 1 Then         sr.Points.PointType = PointType.FillCircle     ElseIf i = 2 Then         sr.Points.PointType = PointType.FillRectangle     ElseIf i = 3 Then         sr.Points.PointType = PointType.FillTriangle     End If         If i = 0 Then         sr.RadarType = RadarPointType.Area     ElseIf i = 1 Then         sr.RadarType = RadarPointType.Point     ElseIf i = 2 Then         sr.RadarType = RadarPointType.Line     ElseIf i = 3 Then         sr.RadarType = RadarPointType.Line     End If         For x As Integer = 0 To 11         Dim item As New SeriesItem()         item.YValue = r.[Next](500)         item.Name = "R" & x.ToString()                 sr.items.Add(item)     Next     sList.SeriesCollection.Add(sr) Next Me.hHippoChart1.LegendBox.Visible = False Me.hHippoChart1.Titles.Label.ForeColor = Color.SteelBlue Me.hHippoChart1.DesignType = ChartDesignType.Simple Me.hHippoChart1.SeriesListDictionary.Add(sList) Me.hHippoChart1.DrawChart()