Private Sub NotifyIcon1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles NotifyIcon1.MouseClick
If e.Button = Windows.Forms.MouseButtons.Left Then
MsgBox("显示左键菜单")
ElseIf e.Button = Windows.Forms.MouseButtons.Right Then
MsgBox("显示右键键菜单")
End If
End Sub