Scatter plot chart using pointType(Image)

C#

SeriesList sList = new SeriesList();             sList.ChartType = ChartType.Scatter;             Random r = new Random();             for (int i = 0; i < 4; i++)             {                 Series sr = new Series();                 if (i == 0)                 {                     sr.Points.PointType = PointType.Image;                     sr.Points.PointImage = @"C:\Documents and Settings\Administrator\My Documents\My Pictures\star.gif";                 }                 if (i == 1)                 {                     sr.Points.PointType = PointType.Image;                     sr.Points.PointImage = @"C:\Documents and Settings\Administrator\My Documents\My Pictures\VtmMenuAlert.gif";                 }                 if (i == 2)                 {                     sr.Points.PointType = PointType.Image;                     sr.Points.PointImage = @"C:\Documents and Settings\Administrator\My Documents\My Pictures\++.gif";                 }                 if (i == 3)                 {                     sr.Points.PointType = PointType.Image;                     sr.Points.PointImage = @"C:\Documents and Settings\Administrator\My Documents\My Pictures\VtmMenuNormal.gif";                 }                 for (int x = 0; x < 5; x++)                 {                     SeriesItem item = new SeriesItem();                     item.YValue = r.Next(100);                     sr.items.Add(item);                 }                 sList.SeriesCollection.Add(sr);             }             this.hHippoChart1.Titles.Label.ForeColor = Color.SteelBlue;             this.hHippoChart1.DesignType = ChartDesignType.Simple;             this.hHippoChart1.SeriesListDictionary.Add(sList);             this.hHippoChart1.DrawChart();

VB

Dim sList As SeriesList = New SeriesList sList.ChartType = ChartType.Scatter Dim r As Random = New Random Dim i As Integer = 0 Do While (i < 4)     Dim sr As Series = New Series     If (i = 0) Then         sr.Points.PointType = PointType.Image         sr.Points.PointImage = "C:\Documents and Settings\Administrator\My Documents\My Pictures\star.gif"     End If     If (i = 1) Then         sr.Points.PointType = PointType.Image         sr.Points.PointImage = "C:\Documents and Settings\Administrator\My Documents\My Pictures\VtmMenuAlert.gif"     End If     If (i = 2) Then         sr.Points.PointType = PointType.Image         sr.Points.PointImage = "C:\Documents and Settings\Administrator\My Documents\My Pictures\++.gif"     End If     If (i = 3) Then         sr.Points.PointType = PointType.Image         sr.Points.PointImage = "C:\Documents and Settings\Administrator\My Documents\My Pictures\VtmMenuNormal.gif"     End If     Dim x As Integer = 0     Do While (x < 5)         Dim item As SeriesItem = New SeriesItem         item.YValue = r.Next(100)         sr.items.Add(item)         x = (x + 1)     Loop     sList.SeriesCollection.Add(sr)     i = (i + 1) Loop Me.hHippoChart1.Titles.Label.ForeColor = Color.SteelBlue Me.hHippoChart1.DesignType = ChartDesignType.Simple Me.hHippoChart1.SeriesListDictionary.Add(sList) Me.hHippoChart1.DrawChart