Tweet

buy prednisolone 25mg tablets prednisolone weight gain go prednisolone side effects tamoxifen uk pct buy tamoxifen tradersbay.com tamoxifen uk pharmacy buy prednisolone 5mg tablets uk buy prednisolone buy naltrexone online canada buy naltrexone link naltrexone buy uk 다양한 포인트 타입으로 그려본 스케터 차트

      

C#

 
SeriesList sList = new SeriesList();
sList.ChartType = ChartType.Scatter;

Random r = new Random();
for(int i = 0; i < 5; i++)
{
Series sr = new Series();
sr.Line.LineWidth = 2;
sr.Points.Width = 10;

sr.Points.PointType = PointType.FillCircle;

if (i == 2) sr.Points.PointType = PointType.FillRectangle;
if (i == 3) sr.Points.PointType = PointType.FillTriangle;
if (i == 4)
{
sr.Points.PointType = PointType.Image;
sr.Points.PointImage = @"C:\Documents and Settings\Administrator\My Documents\My Pictures\hwatoo_missiongray.gif";
}

for(int x = 0; x < 5; x++)
{
SeriesItem item = new SeriesItem();
item.Name = x.ToString();
item.YValue = r.Next(90);

sr.items.Add(item);
}
sList.SeriesCollection.Add(sr);
}

this.hHippoChart1.SeriesListDictionary.Add(sList);
this.hHippoChart1.DrawChart();

VB

 
Dim sList As New. SeriesList()
sList.ChartType = ChartType.Scatter

Dim r As New. Random()
For i As Integer = 0 To 4
Dim sr As New. Series()
sr.Line.LineWidth = 2
sr.Points.Width = 10

sr.Points.PointType = PointType.FillCircle

If i = 2 Then
sr.Points.PointType = PointType.FillRectangle
End If
If i = 3 Then
sr.Points.PointType = PointType.FillTriangle
End If
If i = 4 Then
sr.Points.PointType = PointType.Image
sr.Points.PointImage = "C:\Documents and Settings\Administrator\My Documents\My Pictures\hwatoo_missiongray.gif"
End If

For x As Integer = 0 To 4
Dim item As New. SeriesItem()
item.Name = x.ToString()
item.YValue = r.[Next](90)

sr.items.Add(item)
Next
sList.SeriesCollection.Add(sr)
Next

Me.hHippoChart1.SeriesListDictionary.Add(sList)
Me.hHippoChart1.DrawChart()