Изменить MarkerImage при наведении мыши на DataPoint и ChangeBack на при выходе из Datapoint - PullRequest
0 голосов
/ 06 апреля 2019

Я пытаюсь изменить изображение маркера нанесенных точек данных, когда пользователь наводит курсор на точку данных. Код, который я показал ниже:

Точка данных меняла изображение при наведении на него, но не изменяла его обратно на «Red.png»?

Может кто-нибудь понять, почему этого не происходит?

Спасибо.

 Private Sub Chart1_MouseMove(ByVal sender As Object, ByVal e As MouseEventArgs) Handles Chart1.MouseMove
    Dim result As HitTestResult = Chart1.HitTest(e.X, e.Y)

    If result.ChartElementType = ChartElementType.DataPoint Then
        Chart1.Series(0).Points(result.PointIndex).MarkerImage = "Green.png"

    ElseIf result.ChartElementType = ChartElementType.PlottingArea Then
        Chart1.Series(0).MarkerImage = "Red.png"

    End If

End Sub

1 Ответ

0 голосов
/ 06 апреля 2019

Я понял, что: Изменение этих строк

ElseIf result.ChartElementType = ChartElementType.PlottingArea Then
        Chart1.Series(0).MarkerImage = "Red.png"

На

ElseIf result.ChartElementType = ChartElementType.PlottingArea Then
            For i = 0 To Chart1.Series(0).Points.Count - 1
                Chart1.Series(0).Points(i).MarkerImage = "Red.png"
            Next

Обработано ...

...