FarPoint.Win.Chart.IndexAxis vaxis = new FarPoint.Win.Chart.IndexAxis();
vaxis.Title = "A";
vaxis.TitleVisible = true;
vaxis.LabelTextDirection = FarPoint.Win.Chart.TextDirection.Horizontal;
vaxis.LabelRotationAngle = 40;
vaxis.TitleTextDirection = FarPoint.Win.Chart.TextDirection.Horizontal;
vaxis.TitleRotationAngle = 20;
FarPoint.Win.Chart.ValueAxis v1axis = new FarPoint.Win.Chart.ValueAxis();
v1axis.Title = "Testing";
v1axis.TitleTextDirection = FarPoint.Win.Chart.TextDirection.Horizontal;
v1axis.TitleRotationAngle = -60;
v1axis.LabelTextDirection = FarPoint.Win.Chart.TextDirection.Horizontal;
v1axis.LabelRotationAngle = 10;
FarPoint.Win.Chart.BarSeries series = new FarPoint.Win.Chart.BarSeries();
series.Values.Add(10.0);
series.Values.Add(20.0);
series.Values.Add(4.0);
series.Values.Add(8.0);
FarPoint.Win.Chart.YPlotArea plotArea = new FarPoint.Win.Chart.YPlotArea();
plotArea.Location = new PointF(0.2F, 0.2F);
plotArea.Size = new SizeF(0.6F, 0.6F);
plotArea.XAxis = vaxis;
plotArea.YAxes.Clear();
plotArea.YAxes.Add(v1axis);
plotArea.Series.Add(series);
FarPoint.Win.Chart.ChartModel model = new FarPoint.Win.Chart.ChartModel();
model.PlotAreas.Add(plotArea);
FarPoint.Win.Spread.Chart.SpreadChart chart = new FarPoint.Win.Spread.Chart.SpreadChart();
chart.Size = new Size(200, 200);
chart.Location = new Point(100, 100);
chart.Model = model;
fpSpread1.Sheets[0].Charts.Add(chart);
Dim vaxis As New FarPoint.Win.Chart.IndexAxis
vaxis.Title = "A"
vaxis.TitleVisible = True
vaxis.LabelTextDirection = FarPoint.Win.Chart.TextDirection.Horizontal
vaxis.LabelRotationAngle = 40
vaxis.TitleTextDirection = FarPoint.Win.Chart.TextDirection.Horizontal
vaxis.TitleRotationAngle = 20
Dim v1axis As New FarPoint.Win.Chart.ValueAxis
v1axis.Title = "Testing"
v1axis.TitleTextDirection = FarPoint.Win.Chart.TextDirection.Horizontal
v1axis.TitleRotationAngle = -60
v1axis.LabelTextDirection = FarPoint.Win.Chart.TextDirection.Horizontal
v1axis.LabelRotationAngle = 10
Dim series As New FarPoint.Win.Chart.BarSeries()
series.Values.Add(10.0)
series.Values.Add(20.0)
series.Values.Add(4.0)
series.Values.Add(8.0)
Dim plotArea As New FarPoint.Win.Chart.YPlotArea()
plotArea.Location = New PointF(0.2F, 0.2F)
plotArea.Size = New SizeF(0.6F, 0.6F)
plotArea.XAxis = vaxis
plotArea.YAxes.Clear()
plotArea.YAxes.Add(v1axis)
plotArea.Series.Add(series)
Dim model As New FarPoint.Win.Chart.ChartModel()
model.PlotAreas.Add(plotArea)
Dim chart As New FarPoint.Win.Spread.Chart.SpreadChart()
chart.Size = New Size(200, 200)
chart.Location = New Point(100, 100)
chart.Model = model
FpSpread1.Sheets(0).Charts.Add(chart)