主题：外部数据源不存在时，如何强制退出？

 那执行有什么错？

是不是暂时无法解决这个问题啊？

 

问题是不知道你的是什么问题好吧？直接那样写代码，有什么错？

执行以上代码以后，项目并没有退出，继续出现“登录对话框”，这时必须要点“取消”才行，如果输入密码登录，就出提示出错。

 

正确的过程应该是

1.运行软件

2.判断文件是否存在

3.如果不存在，软件强制退出（这时不应该出现“登录对话框”才对）

如果继续出现登录对话框，然后用户点“取消”退出软件，那么，前面的判断，以及退出软件项目的代码就没有意义了。

 

没有真正实现强制退出。

 不可能出现你这种情况。如果文件不存在，就会弹出提示，点击确定以后，就关闭系统了。

 抱歉，测试了一下，代码这样写

 

If FileSys.FileExists("sj.mdb") Then
    MessageBox.Show("文件已经存在!","提示",MessageBoxButtons.Ok,MessageBoxIcon.Warning,0, Windows.forms.MessageBoxOptions.ServiceNotification)
Else
    MessageBox.Show("文件不存在或已经被删除!","提示",MessageBoxButtons.Ok,MessageBoxIcon.Warning,0, Windows.forms.MessageBoxOptions.ServiceNotification)
    Syscmd.Project.Exit(False)
End If

呵呵，你要不要试一下？

 

 

此主题相关图片如下：2014-6-19 17-30-13.png

  上图，启动软件时。出现提示

 

此主题相关图片如下：2014-6-19 17-30-26.png

 

上图，点击对话框上的确定以后

此主题相关图片如下：2014-6-19 17-30-44.png

 

上图，出错信息开始。

 

没有实现真正的退出项目软件。

看16楼

谢谢老题，问题解决了。辛苦了，呵呵。

Syscmd.Project.Exit() 用这个不带参数的就可以退出，不过比较慢。