- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 退出代码导致错误 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=64649)
-- 发布时间：2015/2/26 15:11:00
-- 退出代码导致错误
输入以下代码，确认后出现如图，请问怎么解决？
If MessageBox.Show("是否退出平台?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes
e.Form.Close
Syscmd.Project.Exit(True)
End If
此主题相关图片如下：未标题-1.jpg
-- 发布时间：2015/2/26 15:12:00
--
If MessageBox.Show("是否退出平台?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes
Syscmd.Project.Exit(True)
End If
-- 发布时间：2015/2/26 15:12:00
--
这段代码不会导致出错，肯定有其它代码影响，比如 BeforeCloseProject事件等
-- 发布时间：2015/2/26 15:19:00
--
以下是引用Bin在2015/2/26 15:12:00的发言：
If MessageBox.Show("是否退出平台?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes
Syscmd.Project.Exit(True)
End If
If MessageBox.Show("是否退出平台?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes
Syscmd.Project.Exit(True)
End If
还是一样
-- 发布时间：2015/2/26 15:20:00
--
以下是引用有点甜在2015/2/26 15:12:00的发言：
这段代码不会导致出错，肯定有其它代码影响，比如 BeforeCloseProject事件等
这段代码不会导致出错，肯定有其它代码影响，比如 BeforeCloseProject事件等
beforecloseproject 是空的， 整个全局就一个afteropenproject 有代码，包括这个窗口的事件都是空的。我准备拿到另外的电脑试试看
-- 发布时间：2015/2/26 15:20:00
--
你的窗口关闭事件 和项目关闭事件 有代码影响,发出来看看吧
-- 发布时间：2015/2/26 15:28:00
--
以下是引用Bin在2015/2/26 15:20:00的发言：
你的窗口关闭事件 和项目关闭事件 有代码影响,发出来看看吧
我重建了一个空白的项目，把这个代码放进去，没有报错，我再仔细看看有什么问题
你的窗口关闭事件 和项目关闭事件 有代码影响,发出来看看吧
-- 发布时间：2015/2/26 15:30:00
--
这种情况，一般是哪个表事件影响了。
-- 发布时间：2015/2/26 15:46:00
--
找到问题了，是afteropenproject造成的：
Forms("主窗口").Open()
主窗口的类型是模式， 退出代码放在主窗口里点击就会报错，放在其它窗口又没问题。这个怎么回事
-- 发布时间：2015/2/26 15:50:00
--
orms("主窗口").Open()
后面肯定还有代码.