Series Object Example

The following example changes the appearance of the lines for all series in a three-dimensional line chart.

Private Sub Command1_Click()
   Dim serX As Series
   ' Change the chart type to 3D line and smoothing
   ' each line.
   MSChart1.chartType = VtChChartType3dLine
   MSChart1.ColumnCount = 4
   For Each serX In MSChart1.Plot.SeriesCollection
      serX.ShowGuideLine(VtChAxisIdY) = True
      serX.GuideLinePen.Style = VtPenStyleDitted
      serX.Pen.Style = 4
   Next
End Sub