Dynamically changing the chart value by using the CustomizeCategoriesAndSeries event
Sub CustomizeCategoriesAndSeries( baseLayer As AcChartLayer, overlayLayer As AcChartLayer, studyLayers() As AcChartLayer )
Super::CustomizeCategoriesAndSeries( baseLayer, overlayLayer, studyLayers )
Dim checkMonth as integer
checkMonth=month(now)
if(checkMonth<>1) then
Dim numberOfSeries As Integer
numberOfSeries = baseLayer.GetNumberOfSeries( )
Dim seriesIndex As Integer
For seriesIndex =checkMonth To numberOfSeries
Dim series As AcChartSeries
Set series = baseLayer.GetSeries( seriesIndex )
Dim point As AcChartPoint
Dim pointIndex As Integer
Set point = series.GetPoint( 1 )
point.SetYValue(0)
Next seriesIndex
end if
End Sub
Sub CustomizeCategoriesAndSeries( baseLayer As AcChartLayer, overlayLayer As AcChartLayer, studyLayers() As AcChartLayer )
Super::CustomizeCategoriesAndSeries( baseLayer, overlayLayer, studyLayers )
Dim checkMonth as integer
checkMonth=month(now)
if(checkMonth<>1) then
Dim numberOfSeries As Integer
numberOfSeries = baseLayer.GetNumberOfSeries( )
Dim seriesIndex As Integer
For seriesIndex =checkMonth To numberOfSeries
Dim series As AcChartSeries
Set series = baseLayer.GetSeries( seriesIndex )
Dim point As AcChartPoint
Dim pointIndex As Integer
Set point = series.GetPoint( 1 )
point.SetYValue(0)
Next seriesIndex
end if
End Sub