[RESOLVED] Change mouseicon when X is near from line?

[Jose_VB]

I've a picturebox where I've 2 vertical straight lines in a program where I want to represent a raw waveform in that picturebox.

1 line is green and it's in the left (I use it to indicate the beginning of the selection).
1 line is red and it's in the right (I use it to indicate the selection end).

When the mouse is near (left or right) from the green/red line then the icon changes to Me.MousePointer = 9. When the mouse is far from those areas then the mousepointer value is zero.

I can accomplish this with one of the lines.

(In PictureBox1_MouseMove)

If X > Picture1.X1 -300 And X < Picture1.X1 + 300 Then 
     Me.MousePointer = 9
Else
     Me.MousePointer = 0
End If

This part works ok because I'm doing it with 1 line only. The problem is when I try to do with both lines (green and red lines) because the area where the mousepointer must change in the red line is considered "Else" case and then the mouse becomes crazy.

I've tried to use the Select Case, but in this attemp to accomplish the same task, the mousepointer doesn't change.

What is the correct way to write the code?

[LaVolpe]

In your else statement, use similar logic to test if the mouse is near the other line's .X1

[Jose_VB]

In your else statement, use similar logic to test if the mouse is near the other line's .X1

I've solved it. I create 2 areas (1 for the green line and the other for the red line) and I follow the next:

If (X>PreGreenLine And X<PostGreenLine) Or (X>PreRedLine And X<PostRedLine) Then
     Me.MousePointer = 3
Else
     Me.MousePointer = 0
End If

Thanks anyway.