vb.net - call double click on mouse single click

Question

how do we call double click on single mouse click event? Iam doing this and it's not working. Any ideas ?

Private Sub RichTextBox1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles RichTextBox1.MouseClick
    RichTextBox1_MouseDoubleClick(sender, e)
End Sub

Answer 1

在属性窗口中单击事件图标并找到双击并在选定的事件名称中选择“RichTextBox1_MouseClick”

Answer 2

基本上有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

注意到最后的第二个 Handles 位了吗？该功能现在可以同时处理:)

两者都可以满足您的需求。

Answer 3

你有没有尝试过：

Private Sub RichTextBox1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles RichTextBox1.MouseClick, RichTextBox1.MouseDoubleClick, RichTextBox1.DoubleClick
    'Do stuff here
End Sub