C#

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

            sList.AxisFactor.YAxis.AnalysisItems[AnalysisCategory.Average].Visible = true;
            sList.AxisFactor.YAxis.AnalysisItems[AnalysisCategory.Average].Line.DashStyle = System.Drawing.Drawing2D.DashStyle.Dash;
            sList.AxisFactor.YAxis.AnalysisItems[AnalysisCategory.Average].Line.LineColor = Color.Red;
            sList.AxisFactor.YAxis.AnalysisItems[AnalysisCategory.Average].Label.Font = new Font("굴림", 11, FontStyle.Bold);
            sList.AxisFactor.YAxis.AnalysisItems[AnalysisCategory.Average].Label.Text = "AVG";
            sList.AxisFactor.YAxis.AnalysisItems[AnalysisCategory.Average].Label.ForeColor = Color.Red;

            Random r = new Random();
            for (int i = 0; i < 4; i++)
            {
                Series sr = new Series();
                sr.Points.Width = 6;
                sr.Points.PointType = PointType.FillRectangle;

                for (int x = 0; x < 4; x++)
                {
                    SeriesItem item = new SeriesItem();
                    item.YValue = r.Next(10000);

                    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.Line
sList.AxisFactor.YAxis.AnalysisItems(AnalysisCategory.Average).Visible 
= true
sList.AxisFactor.YAxis.AnalysisItems(AnalysisCategory.Average).Line.DashStyle System.Drawing.Drawing2D.DashStyle.Dash
sList.AxisFactor.YAxis.AnalysisItems(AnalysisCategory.Average).Line.LineColor 
Color.Red
sList.AxisFactor.YAxis.AnalysisItems(AnalysisCategory.Average).Label.Font 
= New Font("t�"11, FontStyle.Bold)
sList.AxisFactor.YAxis.AnalysisItems(AnalysisCategory.Average).Label.Text 
"AVG"
sList.AxisFactor.YAxis.AnalysisItems(AnalysisCategory.Average).Label.ForeColor Color.Red
Dim As Random = New Random
Dim As Integer = 0
Do While (i < 4)
    
Dim sr As Series = New Series
    sr.Points.Width 
6
    
sr.Points.PointType PointType.FillRectangle
    
Dim As Integer = 0
    
Do While (x < 4)
        
Dim item As SeriesItem = New SeriesItem
        item.YValue 
r.Next(10000)
        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
사업자 정보 표시
히포차트 | 하영대 | 경기도 성남시 수정구 복정동 631-5 401 | 사업자 등록번호 : 129-34-55719 | TEL : 031-751-6673 | Mail : hippochart@gmail.com | 통신판매신고번호 : 제 2010-경기성남-1203호 | 사이버몰의 이용약관 바로가기

Posted by 리바이 병장

댓글을 달아 주세요



/* 다음 웹인사이드 로그 분석*/