主题：关于Syscmd.Project.Exit() 命令

在启动程序的过程中，有些情况需要直接关闭程序，就使用了系统Syscmd.Project.Exit()，但是在如下的所有项目事件中都尝试了这个命令：

Syscmd.Project.Exit() 是退出项目，

打开了项目，才会有退出项目吧。

喔,那要是在AfterOpenProject之前的某个阶段关闭程序，如何实现呢？

你好,你提问中完全没有包括AfterOpenProject , 而且在AfterOpenProject是可以使用的.

OK，谢谢！

还要处理一下BeforeConnectOuterDS中的事件，要求在连接数据源错误的时候直接关闭项目.

楼上同学，不可以在BeforeConnectOuterDataSource事件中关闭项目。
可以在BeforeOpenProject用TryConect直接判断连接字符串是否可以连通。不同则Cancel:
 

TryConnect

测试指定的链接字符串能否连通，如果能连通，则返回True，否则返回False。

语法：

TryConnect(ConnectionString)

ConnectionString：要测试的链接字符串。

Dim s As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\data\Northwind.mdb;Persist Security Info=False"
If Connections.TryConnect(s) = False Then
    MessageBox.Show("数据源无法连通!")
End If

多谢！