Tweet

tamoxifen 20 online tamoxifen buy antidepressants visa buy antidepressants buy abortion pill uk abortion pill online blogs1.welch.jhmi.edu abortion in manchester buy abortion pill online usa abortion pill kit conwaykennels.com medical abortion amitriptyline without prescription buy amitriptyline 히포차트 4.2 버전 부터는 각 축을 날짜형으로 표현할 수 있습니다

                                        

C#

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

sList.AxisFactor.YAxis.DataType = AxisDataType.DateTime;
sList.AxisFactor.XAxis.DataType = AxisDataType.DateTime;

sList.AxisFactor.YAxis.AxisMagin = 70;

Random r = new Random();
for(int i = 0; i < 5; i++)
{
Series sr = new Series();
sr.Points.Width = 7 * r.Next(1, 20);

for(int x = 0; x < 50; x++)
{
SeriesItem item = new SeriesItem();
item.Name = x.ToString();

item.YValue = r.Next(99);

item.XDateTimeValue = DateTime.Now.AddDays(r.Next(0, 45));

item.YDateTimeValue = DateTime.Now.AddDays(r.Next(80, 90));

item.Points = new Points();
item.Points.Width = 7 * r.Next(1, 4);

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

sList.AxisFactor.YAxis.DataType = AxisDataType.DateTime
sList.AxisFactor.XAxis.DataType = AxisDataType.DateTime

sList.AxisFactor.YAxis.AxisMagin = 70

Dim r As New. Random()
For i As Integer = 0 To 4
Dim sr As New. Series()
sr.Points.Width = 7 * r.[Next](1, 20)

For x As Integer = 0 To 49
Dim item As New. SeriesItem()
item.Name = x.ToString()

item.YValue = r.[Next](99)

item.XDateTimeValue = DateTime.Now.AddDays(r.[Next](0, 45))

item.YDateTimeValue = DateTime.Now.AddDays(r.[Next](80, 90))

item.Points = New Points()
item.Points.Width = 7 * r.[Next](1, 4)

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

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