Private Sub Chart1_CursorPositionChanged(ByVal sender As Object, ByVal e As _
  System.Windows.Forms.DataVisualization.Charting.CursorEventArgs) Handles _
  Chart1.CursorPositionChanged
 
        Dim xPos As Double
        Dim yPos As Double
 
 
        xPos = e.ChartArea.CursorX.Position
        yPos = e.ChartArea.CursorY.Position
 
    End Sub