MSCHART - problem with series object eg.

hi,

i tried to use the eg.code given for series object of mschart control (vb 5).

but this gives a error.please help.


is there any other method to draw smooth curves using mschart control.

the eg. code

The following example sets smoothing for all series in a three-dimensional line chart.



************* the ex. code ************************************


Private Sub Command1_Click()

Dim Series As Object

' Change the chart type to 3D line and smoothing

' each line.

Form1.MSChart1.ChartType = VtChChartType3dLine

Form1.MSChart1.ColumnCount = 4

For Each Series In _

Form1.MSChart1.Plot.SeriesCollection

Series.SmoothingType = _

VtSmoothingTypeCubicBSpline

Series.SmoothingFactor = 10

Series.Pen.Style = 4

Next

End Sub