Selected Text

Okay, I have a rich text box and I've built a function based around selected text on a double click... the code works, but how do I prevent the default selecting code in the text box to NOT take over after the double click event? I'm sure it's API... little help?

Try this:

Code:

---

Private Sub RichTextBox1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
    RichTextBox1.SelLength = 0
End Sub

---

not quite, see I want to maintian the selection my code gives, but after that the natural selection of the double click event takes over... I know I can easily change it back but you still see the flash of selected text accross the screen, that's what I'm trying to avoid.