//This chart is with initial zooming, right click on the chart to access zooming. Chart2.TempDirectory = "temp"; Chart2.XAxis.FormatString = "MMM yyyy"; Chart2.Debug = true; Chart2.LegendBox.Position = LegendBoxPosition.None; Chart2.ShadingEffect = true; Chart2.ShadingEffectMode = ShadingEffectMode.Six; Chart2.PaletteName = dotnetCHARTING.Palette.Bright; Chart2.Type = ChartType.Combo; Chart2.Size = "800x350"; Chart2.Title = "A chart with initial zooming, right click on the chart for zooming options. Hover mouse for bar value."; Chart2.DefaultSeries.Type = SeriesType.Bar; Chart2.XAxis.TimeInterval = TimeInterval.Month; Chart2.YAxis.Interval = 10; Chart2.DefaultElement.ShowValue = true; Chart2.DefaultSeries.DefaultElement.ToolTip = "%yValue"; SeriesCollection mySC3= getRandomData(); Chart2.SeriesCollection.Add(mySC3);
//set for initial zooming Chart2.Zoomer.Enabled =true;
//configures the viewport to display 1 year Chart2.XAxis.Viewport.TimeInterval = new TimeIntervalAdvanced(new TimeSpan(365, 0, 0, 0));
//displays starting in 2022 (if not set it would display at the first date. This in effect controls the starting scroll position. Chart2.XAxis.Viewport.ScaleRange = new ScaleRange(new DateTime(2022,1,1),new DateTime(2022,12,31)); } SeriesCollection getRandomData() {
Random myR = new Random(3); SeriesCollection SC = new SeriesCollection(); DateTime dt = new DateTime(2020,1,1);
Series s = new Series(); for(int b = 0; b < 96; b++) {
Element e = new Element(); e.XDateTime = dt; dt = dt.AddMonths(1); e.YValue = myR.Next(50); s.Elements.Add(e); }
// give each series element its own color s.PaletteName = Palette.Two; SC.Add(s);
Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) ' This chart is with zooming, right click on the chart to access zooming Chart.TempDirectory = "temp" Chart.XAxis.FormatString = "MMM yyyy" Chart.Debug = True Chart.LegendBox.Position = LegendBoxPosition.None Chart.ShadingEffect = True Chart.PaletteName = dotnetCHARTING.Palette.Bright Chart.Type = ChartType.Combo Chart.Size = "800x350" Chart.Title = "Chart without zooming"
'This chart is with initial zooming, right click on the chart to access zooming. Chart2.TempDirectory = "temp" Chart2.XAxis.FormatString = "MMM yyyy" Chart2.Debug = True Chart2.LegendBox.Position = LegendBoxPosition.None Chart2.ShadingEffect = True Chart2.ShadingEffectMode = ShadingEffectMode.Six Chart2.PaletteName = dotnetCHARTING.Palette.Bright Chart2.Type = ChartType.Combo Chart2.Size = "800x350" Chart2.Title = "A chart with initial zooming, right click on the chart for zooming options. Hover mouse for bar value." Chart2.DefaultSeries.Type = SeriesType.Bar Chart2.XAxis.TimeInterval = TimeInterval.Month Chart2.YAxis.Interval = 10 Chart2.DefaultElement.ShowValue = True Chart2.DefaultSeries.DefaultElement.ToolTip = "%yValue" Dim mySC3 As SeriesCollection= getRandomData() Chart2.SeriesCollection.Add(mySC3)
'set for initial zooming Chart2.Zoomer.Enabled =True
'configures the viewport to display 1 year Chart2.XAxis.Viewport.TimeInterval = New TimeIntervalAdvanced(New TimeSpan(365, 0, 0, 0))
'displays starting in 2022 (if not set it would display at the first date. This in effect controls the starting scroll position. Chart2.XAxis.Viewport.ScaleRange = New ScaleRange(New DateTime(2022,1,1),New DateTime(2022,12,31)) End Sub Function getRandomData() As SeriesCollection
Dim myR As Random = New Random(3) Dim SC As SeriesCollection = New SeriesCollection() Dim dt As DateTime = New DateTime(2020,1,1)
Dim s As Series = New Series() For b As Integer = 0 To 95
Dim e As Element = New Element() e.XDateTime = dt dt = dt.AddMonths(1) e.YValue = myR.Next(50) s.Elements.Add(e) Next b
' give each series element its own color s.PaletteName = Palette.Two SC.Add(s)
Previous