是否可以从用户控件中检测表单鼠标单击

Question

我创建了一个用户控件，希望能够检测用户何时单击表单。

我已经看到了这个相关的问题但是使用Leave事件的建议并不总是按照我的意愿行事，因为当用户点击Form时焦点不一定会改变（我的控件可能是Form上的唯一控件）在这种情况下，重点仍在我的控制范围内）。

有任何想法吗？

我希望能够从用户控件中执行以下操作：

Private Sub ParentForm_Click(sender As Object, e As System.EventArgs) _
    Handles Me.Parent.Click

End Sub

Answer 1

我会做的略有不同：

Private _form As Control

Private Sub UserControl_ParentChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.ParentChanged

    If _form IsNot Nothing Then
        RemoveHandler _form.Click, AddressOf ParentOnClick
    End If

    _form = Me.FindForm()

    If _form IsNot Nothing Then
        AddHandler _form.Click, AddressOf ParentOnClick
    End If

End Sub

Private Sub ParentOnClick(ByVal sender As Object, ByVal e As EventArgs)
    '...
End Sub

如果它不是表格的直接子项，如果它的父母改变等，这会给它带来更多的灵活性。

Answer 2

我想出了自己的方法-对于有兴趣的人，我将执行以下操作：

Private _parentForm As Form

Private Sub UserControl_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
    _parentForm = CType(Parent, Form)
    AddHandler _parentForm.Click, AddressOf ParentForm_Click
End Sub

Private Sub ParentForm_Click(sender As Object, e As System.EventArgs)
    debug.writeline("Parent form clicked")
End Sub