You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
{{ message }}
This repository has been archived by the owner on Sep 25, 2023. It is now read-only.
Private Sub chartControl1_CustomDrawSeriesPoint(ByVal sender As Object, ByVal e As DevExpress.XtraCharts.CustomDrawSeriesPointEventArgs) Handles chartControl1.CustomDrawSeriesPoint
Dim index As Integer = e.Series.Points.IndexOf(e.SeriesPoint)
If index = 0 Then
If e.SeriesPoint.Values(0) <= e.Series.Points(index+1).Values(0) Then
e.LabelText = ""
End If
Return
End If
If index = e.Series.Points.Count - 1 Then
If e.SeriesPoint.Values(0) <= e.Series.Points(index - 1).Values(0) Then
e.LabelText = ""
End If
Return
End If
If (e.SeriesPoint.Values(0) <= e.Series.Points(index - 1).Values(0)) OrElse (e.SeriesPoint.Values(0) <= e.Series.Points(index + 1).Values(0)) Then