主题：如何实现隐藏系统后右键图标退出系统

看8楼，组合楼上的代码

代码没有变，

Public Dim nfi As new System.Windows.Forms.NotifyIcon '定义通知区域小图标
Public Dim cms As new System.Windows.Forms.ContextMenuStrip '定义右键菜单
'菜单按钮点击事件
Public Sub Menu1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Dim btn As WinForm.Button
MessageBox.Show("你是否退出管理系统?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
BaseMainForm.Visible = True
BaseMainForm.Close
End Sub
'图标双击事件
Public Sub ICON_DoubleClick(ByVal sender As System.Object, ByVal e As System.EventArgs)
baseMainform.visible=True '设置主窗体显示
End Sub