经过反复测试,在第一个表(表A)建立一个子窗口,自动打开属性设为True,保存并关闭系统,再重新打开,您会发现在菜单未出来之前,该窗口先跳出来了,越慢的电脑表现越明显,关闭自动打开属性,在项目属性的
AfterOpenProject事件中输入以下代码:
Maintable = tables("表A")
Dim frm As WinForm.Form
frm = Forms("窗口1")
frm.Open()
此时,系统菜单与该窗口几乎同时显示(菜单稍快于该窗口)
由此可见,系统设定的窗口自动打开属性先于系统菜单打开,之所以提出此问题,一来显得有些别扭,二来,担心窗口跳出过早,及时点中某一个跳转主表的按钮(该窗口很多时候会有进入其他主表的按钮),该点击动作还能够生效,这样会越过一些权限管理代码的执行(当然,设计员可以在这个窗口的按钮中加入权限管理代码,但是,那样终究说不过去,是否会越过自定义用户登录窗口,暂时还没有测试),以上只是个人担心而已,请大家测试一下,有必要的话,贺老师给调整一下执行顺序。
[此贴子已经被作者于2009-1-31 4:28:18编辑过]