Есть в основном 2 варианта. Во-первых, как вы это делаете, клик все же может сделать больше, а также двойной щелчок.
Private Sub RichTextBox1_MouseClick(sender As System.Object, e As System.Windows.Forms.MouseEventArgs) Handles RichTextBox1.MouseClick
'' i can do stuff here
RichTextBox1_MouseDoubleClick(sender, e)
'' and here
'' as well as do whatever double click is doing
End Sub
Private Sub RichTextBox1_MouseDoubleClick(sender As System.Object, e As System.Windows.Forms.MouseEventArgs) Handles RichTextBox1.MouseDoubleClick
'' to do something here
End Sub
Другой вариант, если они всегда будут делать то же самое, вы можете сделать это:
Private Sub RichTextBox1_Single_DoubleClick(sender As System.Object, e As System.Windows.Forms.MouseEventArgs) Handles RichTextBox1.MouseClick, RichTextBox1.MouseDoubleClick
'' do something here
End Sub
Обратите внимание на второй ручки немного на конце? эта функция может обрабатывать и то и другое :)
Либо должно работать нормально для того, что вы хотите.
Это должно работать. Вы получаете какие-либо ошибки ?. Кроме того, вы можете попробовать [This] (http://stackoverflow.com/a/9555719/1189040) – Himal
«Не работает» - это бессмысленное описание проблемы. Вы действительно создали метод RichTextBox1_MouseDoubleClick в своем коде? –