如何通過在特定位置上使用MouseHover禁用鼠標單擊窗口上的窗體

Question

Private Sub admin_MouseHover(sender As Object, e As EventArgs) Handles Me.MouseHover 
    ContextMenuStrip1.Enabled = False 
End Sub 

Private Sub Label1_MouseHover(sender As Object, e As EventArgs) Handles Label1.MouseHover 
    ContextMenuStrip1.Enabled = True 
    ContextMenuStrip1.Show() 
End Sub 

Answer 1

您不禁用點擊 - 您無法實際執行此操作。你所做的是根據需要分離並附加處理程序。

你可能想是這樣的：

Private Sub admin_MouseHover(sender As Object, e As EventArgs) Handles Me.MouseHover 
    RemoveHandler ContextMenuStrip1.Click, AddressOf ContextMenuStrip1_Click 
End Sub 

Private Sub Label1_MouseHover(sender As Object, e As EventArgs) Handles Label1.MouseHover 
    AddHandler ContextMenuStrip1.Click, AddressOf ContextMenuStrip1_Click 
End Sub 

Private Sub ContextMenuStrip1_Click(sender As Object, e As EventArgs) 
    ' Code here 
End Sub 

只要確保你不線了ContextMenuStrip1_Click在代碼隱藏 - 即注意，沒有Handles條款。讓上面的方法爲你做。