Add Method

Description

Adds a new ChartSeriesPoint to the series's collection of points. This method is used by all series types except those that require Add2 (RangeBar, Bubble) or Add4 (CandleStick, HighLow).

Syntax

Public Function Add( _
    ByVal [Argument](#) As Variant, _
    ByVal [Value](#) As Variant _
) As [ChartSeriesPoint](XtremeChartControl~ChartSeriesPoint.md)

Parameters

Argument: String value denoting the argument.
Value: Value for the point.

Return Type

Reference to the ChartSeriesPoint to be added.

Remarks

Add is used by all series types except those that need Add2 (RangeBar, Bubble) or Add4 (CandleStick, HighLow).

Example

The following sample uses Add to add some points to a bar chart series:

Dim Series As ChartSeries  
Set Series = ChartControl.Content.Series.Add("Quoted")  

Series.Points.Add "Sam", 11  
Series.Points.Add "Jesse", 12  
Series.Points.Add "Dave", 4.5  
Series.Points.Add "Max", 6  
Series.Points.Add "Brian", 5  

Set Series = ChartControl.Content.Series.Add("Hourly")  
Series.Points.Add "Sam", 12  
Series.Points.Add "Jesse", 9.5  
Series.Points.Add "Dave", 5  
Series.Points.Add "Max", 12  
Series.Points.Add "Brian", 11

Set Series = ChartControl.Content.Series.Add("Unbillable")  
Series.Points.Add "Sam", 7  
Series.Points.Add "Jesse", 2  
Series.Points.Add "Dave", 5  
Series.Points.Add "Max", 1  
Series.Points.Add "Brian", 4

Set ChartControl.Content.Series(0).Style = New ChartBarSeriesStyle  
Set ChartControl.Content.Series(1).Style = New ChartBarSeriesStyle  
Set ChartControl.Content.Series(2).Style = New ChartBarSeriesStyle  

Dim Diagram As ChartDiagram2D  
Set Diagram = ChartControl.Content.Diagrams(0)  

Diagram.AxisY.Title.Visible = True  
Diagram.AxisY.Title.Text = "Hours"  
Diagram.AxisX.Title.Visible = True  
Diagram.AxisX.Title.Text = "Employee"