主题：[求助]用2017版只要运行关闭项目的代码 就会报错（已解决）

如下图，这是什么错误？

 

只要用到 Syscmd.Project.Exit(False) 或 Syscmd.Project.Exit() 和 basemainform.Close  都会报错

 

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

 

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目2.foxdb

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:测试.rar

 

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

17年6月12号版本，我没调用外部DLL，现在删除了部分调用WINDOWS的代码在测试中，空项目暂时没测试

还是不行，我现在是直接发布，没用在线升级，发布后直接运行的

 

            MessageBox.Show("该终端的授权信息验证失败,授权信息被非法修改,请联系开发者验证处理![错误代码:ZC02]","错误提示",MessageBoxButtons.Ok, MessageBoxIcon.Warning)
            Syscmd.Project.Exit(False)

 

运行到这里就报错，上面图的提示

 

 

BeforeCloseProject

 

 

With DataTables("临时订单明细")
    .DataRows.Clear() '清除所有行
End With
DataTables("临时订单明细").Save()
If Forms("登陆验证").opened Or vars("退出") = "是" Then
    Return
End If
If pause = False Then
    If Messagebox.Show("确定要退出吗?","提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.No Then '如果用户选择否
        e.Cancel = True '取消关闭项目
        Return
    End If
End If
vars("提示") = "系统退出中,请稍后……"
Forms("加载").show
Application.DoEvents()
If _czyzh <> "" Then
    DataTables("yhgl").SQLReplaceFor("zt", "离线", "dlzh = '" & _czyzh & "'")
End If
For Each dt As DataTable In DataTables
    dt.save
Next
Forms("加载").close

 

 

感觉都是去到关闭项目就会报错

还是不行，BeforeCloseProject 不写代码 也是会报错

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:测试.rar

 

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


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

 

我现在做了个测试的列子，直接关闭都会报错

我上传了例子，没啥代码的，直接点击关闭都会报错

开发者密码 六个8

刚重建了一个空项目 只要用到 Syscmd.Project.Exit(False) 或 Syscmd.Project.Exit() 和 basemainform.Close  都会报错

不会吧？我直接在命令窗口 执行Syscmd.Project.Exit(False) 也会报错，windows版本 是 win10家庭中文版

 

您下载我附件中的 管理项目2.foxdb 试试

请问 下载我附件中的 管理项目2.foxdb 是否正常呢？