右键菜单用ContextMenuStrip实现后,第一次点击鼠标右键菜单不出来。
第二次以后就正常显示菜单了,不知道什么原因。
Private Sub frmRoomDisplay_MouseClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseClick, pnlFlow.MouseClick, pnlExg.MouseClick
If e.Button = Windows.Forms.MouseButtons.Right Then
If sender.Equals(pnlFlow) Then
pnlFlow.ContextMenuStrip = cmsRoomDisplay
ElseIf sender.Equals(pnlExg) Then
pnlExg.ContextMenuStrip = cmsRoomDisplay
ElseIf sender.Equals(Me) Then
Me.ContextMenuStrip = cmsRoomDisplay
End If
End If
End Sub