1、设置默认用户
http://www.foxtable.com/webhelp/scr/1796.htm
2、
在项目事件AfterOpenProject中加入代码:
Forms("用户登录").Open()If _UserName = "" Then Syscmd.Project.Exit() Return '这个要加上,因为既然要退出,就不应该再执行后面的初始化代码了,否则会出错End If