02-25-2002 01:55 PM
02-26-2002 12:38 PM
04-09-2010 04:28 PM
I have handled this in VB6 differently.
Private Sub CWGraph1_Zoom()
Randomize
Me.CWGraph1.Cursors(i).XPosition = Rnd() * (Me.CWGraph1.Axes(1).Maximum - Me.CWGraph1.Axes(1).Minimum) + Me.CWGraph1.Axes(1).Minimum
End Sub
It will keep the cursor within the range of the horizontal axis.