CandlestickSeries series = new CandlestickSeries();
series.OpenValues.Add(3);
series.OpenValues.Add(5);
series.OpenValues.Add(4);
series.OpenValues.Add(6);
series.OpenValues.Add(5);
series.OpenValues.Add(7);
series.HighValues.Add(5);
series.HighValues.Add(7);
series.HighValues.Add(6);
series.HighValues.Add(8);
series.HighValues.Add(7);
series.HighValues.Add(9);
series.LowValues.Add(2);
series.LowValues.Add(4);
series.LowValues.Add(3);
series.LowValues.Add(5);
series.LowValues.Add(4);
series.LowValues.Add(6);
series.CloseValues.Add(4);
series.CloseValues.Add(6);
series.CloseValues.Add(5);
series.CloseValues.Add(7);
series.CloseValues.Add(6);
series.CloseValues.Add(8);
YPlotArea plotArea = new YPlotArea();
plotArea.Location = new PointF(0.2f, 0.2f);
plotArea.Size = new SizeF(0.6f, 0.6f);
plotArea.Series.Add(series);
ChartModel model = new ChartModel();
model.PlotAreas.Add(plotArea);
FarPoint.Web.Spread.Chart.SpreadChart chart = new FarPoint.Web.Spread.Chart.SpreadChart();
chart.Model = model;
FpSpread1.Sheets[0].Charts.Add(chart);
Dim series As New FarPoint.Web.Chart.CandlestickSeries()
series.OpenValues.Add(3)
series.OpenValues.Add(5)
series.OpenValues.Add(4)
series.OpenValues.Add(6)
series.OpenValues.Add(5)
series.OpenValues.Add(7)
series.HighValues.Add(5)
series.HighValues.Add(7)
series.HighValues.Add(6)
series.HighValues.Add(8)
series.HighValues.Add(7)
series.HighValues.Add(9)
series.LowValues.Add(2)
series.LowValues.Add(4)
series.LowValues.Add(3)
series.LowValues.Add(5)
series.LowValues.Add(4)
series.LowValues.Add(6)
series.CloseValues.Add(4)
series.CloseValues.Add(6)
series.CloseValues.Add(5)
series.CloseValues.Add(7)
series.CloseValues.Add(6)
series.CloseValues.Add(8)
Dim plotArea As New FarPoint.Web.Chart.YPlotArea()
plotArea.Location = New System.Drawing.PointF(0.2F, 0.2F)
plotArea.Size = New System.Drawing.SizeF(0.6F, 0.6F)
plotArea.Series.Add(series)
Dim model As New FarPoint.Web.Chart.ChartModel()
model.PlotAreas.Add(plotArea)
Dim chart As New FarPoint.Web.Spread.Chart.SpreadChart()
chart.Model = model
FpSpread1.Sheets(0).Charts.Add(chart)