用外部数据源自定义用户管理，打开项目第一个打开的依然是内置的登录窗，第二个才是自定义的。

在项目事件

AfterOpenProject中，已放置了如下代码

Dim cmd As New SQLCommand
cmd.C
cmd.CommandText = "SELECT * Fr om {Users} Where [Name] Is Null"
_UserTable = cmd.ExecuteReader(True)

Fo rms("用户登录").Open()
If _UserName = "" Then
    Syscmd.Project.Exit()
    Return

End If

请兰老师指点迷津