' Set series type. Chart.DefaultSeries.Type = SeriesType.Line Chart.DefaultElement.Marker.Visible = False
' Set line properties. Chart.DefaultSeries.Line.Width = 10 Chart.DefaultSeries.Line.AnchorCapScale = 2 Chart.DefaultSeries.Line.EndCap = LineCap.ArrowAnchor Dim s1 As Series = Series.FromYValues(10, 20, 15, 30) s1.Elements(0).Name = "A" s1.Elements(1).Name = "B" s1.Elements(2).Name = "C" s1.Elements(3).Name = "D" Chart.SeriesCollection.Add(s1) End Sub
Previous