主题：[求助]项目代码里面退出系统

我需要在项目代码里面加入点击“退出系统”的代码怎么写啊？

 

AddHandler nfi.DoubleClick, AddressOf Icon_DoubleClick

Dim tsmi1 As new System.Windows.Forms.ToolStripMenuItem("退出系统",GetImage(projectpath & "\BrowseMode.ico")) 
AddHandler tsmi1 .Click, AddressOf Menu1_Click 

nfi.ContextMenuStrip = cms
nfi.Text = "我是狐表"
nfi.Icon = new Icon(ProjectPath & "\001.ico")
nfi.Visible = True

Forms("窗口1").show

直接这样就可以了

Public Sub Menu1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
     Syscmd.Project.Exit()
End Sub

此主题相关图片如下：qq截图20160721101119.png

大红袍老师，发现个问题，我不点确定，直接点上方的光比按钮，还是会退出系统呢？

大红袍老师，这样就能完全解决了，不知道有没错，请看看，谢谢

Public Sub Menu1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Dim Result As DialogResult
Result = MessageBox.Show("你确定退出系统?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
        basemainform.Close
    Else
   End If
End Sub