ChartLineSeriesStyle Object

Product: Chart Pro ActiveX Control v24.0

Description

Line chart style.

For a list of all members defined in this module, see ChartLineSeriesStyle members.

Object Model

ChartLineSeriesStyle diagram

Related objects / properties:

parmult ErrorBar
parmult GetRotation
parmult Label
parmult Marker
parchild LineStyle

Remarks

A line chart is used to show a series of data points connected by straight line segments. Charts of this type are generally used to illustrate trends in data over a period of time.

Line chart example

Example

' Line series style

ChartControl.Content.Legend.Visible = True
ChartControl.Content.Legend.HorizontalAlignment = xtpChartLegendNearOutside

Dim Series As ChartSeries

Set Series = ChartControl.Content.Series.Add("New York")

Series.Points.Add 1900, 7268
Series.Points.Add 1950, 14830
Series.Points.Add 1990, 17990
Series.Points.Add 2000, 18976
Series.Points.Add 2008, 20323

Set Series = ChartControl.Content.Series.Add("California")

Series.Points.Add 1900, 1485
Series.Points.Add 1950, 10586
Series.Points.Add 1990, 29760
Series.Points.Add 2000, 33871
Series.Points.Add 2008, 36756

Set Series = ChartControl.Content.Series.Add("Florida")

Series.Points.Add 1900, 528
Series.Points.Add 1950, 2771
Series.Points.Add 1990, 12937
Series.Points.Add 2000, 15982
Series.Points.Add 2008, 18328

Set Series = ChartControl.Content.Series.Add("Texas")

Series.Points.Add 1900, 3048
Series.Points.Add 1950, 7711
Series.Points.Add 1990, 14986
Series.Points.Add 2000, 20851
Series.Points.Add 2008, 24326

ChartControl.Content.Titles.Add "Population by U.S. State"
ChartControl.Content.Legend.Visible = True

Dim xLineStyle As ChartLineSeriesStyle
Dim nThickness As Integer

' nThickness = 10

Set xLineStyle = New ChartLineSeriesStyle
xLineStyle.LineStyle.DashStyle = xtpChartDashStyleSolid
' xLineStyle.LineStyle.Thickness = nThickness
Set ChartControl.Content.Series(3).Style = xLineStyle

Set xLineStyle = New ChartLineSeriesStyle
xLineStyle.LineStyle.DashStyle = xtpChartDashStyleSolid
' xLineStyle.LineStyle.Thickness = nThickness
Set ChartControl.Content.Series(2).Style = xLineStyle

Set xLineStyle = New ChartLineSeriesStyle
xLineStyle.LineStyle.DashStyle = xtpChartDashStyleSolid
' xLineStyle.LineStyle.Thickness = nThickness
Set ChartControl.Content.Series(1).Style = xLineStyle

Set xLineStyle = New ChartLineSeriesStyle
xLineStyle.LineStyle.DashStyle = xtpChartDashStyleSolid
' xLineStyle.LineStyle.Thickness = nThickness
Set ChartControl.Content.Series(0).Style = xLineStyle

Dim Diagram As ChartDiagram2D
Set Diagram = ChartControl.Content.Series(0).Diagram
Diagram.AxisY.Title = "Population Growth (Millions)"
Diagram.AxisY.Title.Visible = True
Diagram.AxisX.Title = "Decade / Year"
Diagram.AxisX.Title.Visible = True