Area Chart

using System;
using System.Windows.Forms;
using DevExpress.XtraCharts;
// ...

private void Form1_Load(object sender, EventArgs e) {
    // Create a new chart.
    ChartControl areaChart3D = new ChartControl();

    // Add an area series to it.
    Series series1 = new Series("Series 1", ViewType.Area3D);
    
    // Add points to the series.
    series1.Points.Add(new SeriesPoint("A", 10));
    series1.Points.Add(new SeriesPoint("B", 2));
    series1.Points.Add(new SeriesPoint("C", 14));
    series1.Points.Add(new SeriesPoint("D", 7));

    // Add the series to the chart.
    areaChart3D.Series.Add(series1);

    // Customize the view-type-specific properties of the series.
    ((Area3DSeriesView)series1.View).AreaWidth = 5;

    // Access the diagram's options.
    ((XYDiagram3D)areaChart3D.Diagram).ZoomPercent = 110;

    // Add a title to the chart and hide the legend.
    ChartTitle chartTitle1 = new ChartTitle();
    chartTitle1.Text = "3D Area Chart";
    areaChart3D.Titles.Add(chartTitle1);
    areaChart3D.Legend.Visible = false;

    // Add the chart to the form.
    areaChart3D.Dock = DockStyle.Fill;
    this.Controls.Add(areaChart3D);
}

Imports System
Imports System.Windows.Forms
Imports DevExpress.XtraCharts
' ...

Private Sub Form1_Load(ByVal sender As Object, _ 
ByVal e As EventArgs) Handles MyBase.Load
    ' Create a new chart.
    Dim areaChart3D As New ChartControl()

    ' Add an area series to it.
    Dim series1 As New Series("Series 1", ViewType.Area3D)

    ' Add points to the series.
    series1.Points.Add(New SeriesPoint("A", 10))
    series1.Points.Add(New SeriesPoint("B", 2))
    series1.Points.Add(New SeriesPoint("C", 14))
    series1.Points.Add(New SeriesPoint("D", 7))

    ' Add the series to the chart.
    areaChart3D.Series.Add(series1)

    ' Customize the view-type-specific properties of the series.
    CType(series1.View, Area3DSeriesView).AreaWidth = 5

    ' Access the diagram's options.
    CType(areaChart3D.Diagram, XYDiagram3D).ZoomPercent = 110

    ' Add a title to the chart and hide the legend.
    Dim chartTitle1 As New ChartTitle()
    chartTitle1.Text = "3D Area Chart"
    areaChart3D.Titles.Add(chartTitle1)
    areaChart3D.Legend.Visible = False

    ' Add the chart to the form.
    areaChart3D.Dock = DockStyle.Fill
    Me.Controls.Add(areaChart3D)
End Sub