以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于beforecloseproject事件退出项目操作  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=119156)

--  作者:lzw001
--  发布时间:2018/5/18 16:42:00
--  关于beforecloseproject事件退出项目操作
老师,在此事件中这样子写之后,点击关闭项目时,点击确定,却没有退出项目,是哪里的问题呢
Dim result As DialogResult
result = MessageBox.Show("你确定要退出吗?","提示", MessageBoxButtons.YesNo,MessageBoxIcon.Question)
If result =DialogResult.OK Then
    Syscmd.Project.Exit()
Else
    e.Cancel=True
End If


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180518164008.png
图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2018/5/18 16:47:00
--  
这个代码删除 Syscmd.Project.Exit()
--  作者:lzw001
--  发布时间:2018/5/18 17:06:00
--  
删除了,也是退不出
--  作者:有点甜
--  发布时间:2018/5/18 17:56:00
--  
Dim result As DialogResult
result = MessageBox.Show("你确定要退出吗?","提示", MessageBoxButtons.YesNo,MessageBoxIcon.Question)
If result = DialogResult.Yes Then
    Syscmd.Project.Save()
Else
    e.Cancel=True
End If

--  作者:lzw001
--  发布时间:2018/5/19 11:45:00
--  
可以了,谢谢