The following example demonstrates how to create a ChartControl with two series of the DevExpress.XtraCharts.SideBySideBarSeriesView type, and add this chart to a form at runtime. Before proceeding with this example, first create a Windows Forms Application in Visual Studio, and include all necessary assemblies to the References list of your project.
Then, add the following code to the Form.Load event handler.
Form1.cs |
using System;
using System.Windows.Forms;
using DevExpress.XtraCharts;
namespace SideBySideBar2D {
public partial class Form1 : Form {
public Form1() {
InitializeComponent();
}
private void Form1_Load(object sender, EventArgs e) {
ChartControl sideBySideBarChart = new ChartControl();
Series series1 = new Series("Side-by-Side Bar Series 1", ViewType.Bar);
series1.Points.Add(new SeriesPoint("A", 10));
series1.Points.Add(new SeriesPoint("B", 12));
series1.Points.Add(new SeriesPoint("C", 14));
series1.Points.Add(new SeriesPoint("D", 17));
Series series2 = new Series("Side-by-Side Bar Series 2", ViewType.Bar);
series2.Points.Add(new SeriesPoint("A", 15));
series2.Points.Add(new SeriesPoint("B", 18));
series2.Points.Add(new SeriesPoint("C", 25));
series2.Points.Add(new SeriesPoint("D", 33));
sideBySideBarChart.Series.Add(series1);
sideBySideBarChart.Series.Add(series2);
sideBySideBarChart.Legend.Visibility = DevExpress.Utils.DefaultBoolean.False;
((XYDiagram)sideBySideBarChart.Diagram).Rotated = true;
ChartTitle chartTitle1 = new ChartTitle();
chartTitle1.Text = "Side-by-Side Bar Chart";
sideBySideBarChart.Titles.Add(chartTitle1);
sideBySideBarChart.Dock = DockStyle.Fill;
this.Controls.Add(sideBySideBarChart);
}
}
}
|
Form1.vb |
Imports System
Imports System.Windows.Forms
Imports DevExpress.XtraCharts
' ...
Namespace SideBySideBar2D
Partial Public Class Form1
Inherits Form
Public Sub New()
InitializeComponent()
End Sub
Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load
' Create an empty chart.
Dim sideBySideBarChart As New ChartControl()
' Create the first side-by-side bar series and add points to it.
Dim series1 As New Series("Side-by-Side Bar Series 1", ViewType.Bar)
series1.Points.Add(New SeriesPoint("A", 10))
series1.Points.Add(New SeriesPoint("B", 12))
series1.Points.Add(New SeriesPoint("C", 14))
series1.Points.Add(New SeriesPoint("D", 17))
' Create the second side-by-side bar series and add points to it.
Dim series2 As New Series("Side-by-Side Bar Series 2", ViewType.Bar)
series2.Points.Add(New SeriesPoint("A", 15))
series2.Points.Add(New SeriesPoint("B", 18))
series2.Points.Add(New SeriesPoint("C", 25))
series2.Points.Add(New SeriesPoint("D", 33))
' Add the series to the chart.
sideBySideBarChart.Series.Add(series1)
sideBySideBarChart.Series.Add(series2)
' Hide the legend (if necessary).
sideBySideBarChart.Legend.Visibility = DevExpress.Utils.DefaultBoolean.False
' Rotate the diagram (if necessary).
CType(sideBySideBarChart.Diagram, XYDiagram).Rotated = True
' Add a title to the chart (if necessary).
Dim chartTitle1 As New ChartTitle()
chartTitle1.Text = "Side-by-Side Bar Chart"
sideBySideBarChart.Titles.Add(chartTitle1)
' Add the chart to the form.
sideBySideBarChart.Dock = DockStyle.Fill
Me.Controls.Add(sideBySideBarChart)
End Sub
End Class
End Namespace
|