Bouncing verursacht durch Entsperren if Anweisung VB.NET

Question

Gibt es eine Lösung, die eine bessere Ausgabe zu meiner VB.NET-if-Anweisung generieren würde. Ich habe versucht, das Sperren zu verhindern, indem ich die Min- und Max-Werte unter oder über diesen Werten festlege. Es funktioniert, aber die Ausgabe ist nicht so charmant, dh die Werte springen hin und her.

 If MouseButtons = 1048576 Then      ' On mouse down (within loop) 
     If Track >= TrackMin AndAlso Track <= TrackMax Then ' Evaluate and integrate mouse position if in range 
      Track = Track + (Yabs - SampleMouse)  ' Do it 

     ElseIf Track < TrackMin Then     ' If smaller than Trackmin 
      Track = TrackMin       ' Use TrackMin to avoid locking if statement 
     ElseIf Track > TrackMax Then     ' If Greater than TrackMax 
      Track = TrackMax       ' Use TrackMax to avoid locking if statement 
     End If 
    End If 

Answer 1

Was ich getan habe, war die Anweisung mit einer anderen If-Anweisung zu maskieren. Aber zwei oder drei Wochen in VB weiß ich wirklich nicht, ob dies der optimierten Lösung nahe kommt. Es funktioniert gut.