主题：然后在BeforeConnectOuterDataSource事件中加入下面的代码：

然后在BeforeConnectOuterDataSource事件中加入下面的代码：

If e.name = "连接名称" Then
    e.C & e.ProjectPath & e.User.ExtendedValues("数据库") & ".mdb;Persist Security Info=False"
End if

启动打开 是对的，在系统中切换用户，还是原来的数据源 ，没有变化

做个切换按钮是可以的，点击它 原来的界面还存在， 直至跳出用户登录还在

目标是达到的 切换时原来的界面还在

隐藏界面后 进去后就不见了

没有界面了 哈哈

在

AfterOpenProject