SeriesList sList = new SeriesList();
sList.ChartType = ChartType.Spline;
AxisArea ar = new AxisArea("", 10, 20);
ar.BackColor = Color.FromArgb(40, Color.SteelBlue);
ar.LegendVisible = false;
sList.AxisFactor.XAxis.Areas.Add(ar);
SeriesList sList2 = new SeriesList();
sList2.AxisFactor.XAxis.SetAxisStep(10, 20, 1);
sList2.AxisFactor.XAxis.Areas.Add(ar);
sList2.GraphTitle.Label.Text = "↓";
sList2.GraphTitle.Label.Font = new Font("굴림", 20, FontStyle.Bold);
sList2.GraphTitle.TitleAlign = StringAlignment.Center;
sList.AxisFactor.XAxis.DataType = AxisDataType.Number;
sList2.AxisFactor.XAxis.DataType = AxisDataType.Number;
Random r = new Random();
Series sr = new Series();
sList.Margin = 30;
for(int x = 0; x < 40; x++)
{
SeriesItem item = new SeriesItem();
item.YValue = r.Next(110) * x;
item.Name = x.ToString();
item.XValue = x;
sr.items.Add(item);
}
sList.SeriesCollection.Add(sr);
sList2.SeriesCollection.Add(sr);
this.hHippoChart1.SeriesListDictionary.Add(sList);
this.hHippoChart1.SeriesListDictionary.Add(sList2);
this.hHippoChart1.Titles.Label.ForeColor = Color.SteelBlue;
this.hHippoChart1.DesignType = ChartDesignType.None;
this.hHippoChart1.Direction = GraphAreaLocation.Vertical;
this.hHippoChart1.LegendBox.Visible = false;
this.hHippoChart1.DrawChart();
Dim sList As New. SeriesList()
sList.ChartType = ChartType.Spline
Dim ar As New. AxisArea("", 10, 20)
ar.BackColor = Color.FromArgb(40, Color.SteelBlue)
ar.LegendVisible = False
sList.AxisFactor.XAxis.Areas.Add(ar)
Dim sList2 As New. SeriesList()
sList2.AxisFactor.XAxis.SetAxisStep(10, 20, 1)
sList2.AxisFactor.XAxis.Areas.Add(ar)
sList2.GraphTitle.Label.Text = "↓"
sList2.GraphTitle.Label.Font = New Font("굴림", 20, FontStyle.Bold)
sList2.GraphTitle.TitleAlign = StringAlignment.Center
sList.AxisFactor.XAxis.DataType = AxisDataType.Number
sList2.AxisFactor.XAxis.DataType = AxisDataType.Number
Dim r As New. Random()
Dim sr As New. Series()
sList.Margin = 30
Dim x As Integer = 0
While x < 40
Dim item As New. SeriesItem()
item.YValue = r.[Next](110) * x
item.Name = x.ToString()
item.XValue = x
sr.items.Add(item)
System.Math.Max(System.Threading.Interlocked.Increment(x),x - 1)
End While
sList.SeriesCollection.Add(sr)
sList2.SeriesCollection.Add(sr)
Me.hHippoChart1.SeriesListDictionary.Add(sList)
Me.hHippoChart1.SeriesListDictionary.Add(sList2)
Me.hHippoChart1.Titles.Label.ForeColor = Color.SteelBlue
Me.hHippoChart1.DesignType = ChartDesignType.None
Me.hHippoChart1.Direction = GraphAreaLocation.Vertical
Me.hHippoChart1.LegendBox.Visible = False
Me.hHippoChart1.DrawChart()