Office中国论坛/Access中国论坛

标题: [求助]窗口加载时撤销加载,返回上级窗口的问题 [打印本页]

作者: fannky    时间: 2006-6-8 01:40
标题: [求助]窗口加载时撤销加载,返回上级窗口的问题
我在窗口加载时加了一个判断程序,根据不同的情况初始化窗口。当所有条件都不符合时就要Cancel掉这个窗口并且直接返回到上级窗口,(这个窗口可能是因为点击了打开改窗口的按钮而自己已经关闭了,也可能没有关闭)

在Form_load()的时候不能使用Docmd.close的……晕阿,着急中


[em06][em06]

源文件已经上传,请指点

[attach]18386[/attach]




[此贴子已经被作者于2006-6-8 9:08:08编辑过]


作者: nxjswt    时间: 2006-6-8 02:58
可以在窗体属性的计时器触发事件里面,设计个延时自动关闭!
作者: andymark    时间: 2006-6-8 03:22
在OPEN事件

Cancel = True   就取消打开了

[此贴子已经被作者于2006-6-7 19:23:48编辑过]


作者: fannky    时间: 2006-6-8 03:38
以下是引用andymark在2006-6-7 19:22:00的发言:


在OPEN事件

Cancel = True   就取消打开了

还是不行啊
作者: andymark    时间: 2006-6-8 03:43
你要处理什么事情,把代码贴上来
作者: swx    时间: 2006-6-8 07:16
实在不行的话,先隐式打开窗体,条件允许,显示窗体,条件不允许关闭窗体咯。
作者: fannky    时间: 2006-6-8 17:10
标题: 回复:(andymark)你要处理什么事情,把代码贴上来
已经上传
作者: andymark    时间: 2006-6-8 17:21
试试改成:

DoCmd.Close acForm, frm.Name
作者: fannky    时间: 2006-6-9 01:11
以下是引用andymark在2006-6-8 9:21:00的发言:


试试改成:

DoCmd.Close acForm, frm.Name



这样改后到是确实能够关掉目标窗口,但是如果他的父级窗口在打开时同时执行了Docmd.close关闭了自己,那么就不能返回上级窗口了,

我希望这些都能集成在模块中,直接在窗口打开时候加在这个函数就能实现这些功能,有什么办法没有?
作者: andymark    时间: 2006-6-9 01:28
在执行DoCmd.Close acForm, frm.Name前判断父窗体是否打开,如果已关闭,刚打开父窗体,再关闭自已


作者: fannky    时间: 2006-6-9 16:25
以下是引用andymark在2006-6-8 17:28:00的发言:


在执行DoCmd.Close acForm, frm.Name前判断父窗体是否打开,如果已关闭,刚打开父窗体,再关闭自已



这样的到是可以实现哦,那么这个函数执行起来就需要加参了(父窗口名)?

可不可以设计成不用加参的通用函数呢?

再次感谢斑竹的热心解答
作者: andymark    时间: 2006-6-9 23:01
以下是引用fannky在2006-6-9 8:25:00的发言:





这样的到是可以实现哦,那么这个函数执行起来就需要加参了(父窗口名)?

可不可以设计成不用加参的通用函数呢?

再次感谢斑竹的热心解答

   你的是控制权限的主窗体,没必要关闭,可以隐蔽的方式

                 [attach]18430[/attach]

作者: fannky    时间: 2006-6-10 23:32
标题: 回复:(andymark)以下是引用fannky在2006-6-9 8:25:...
谢谢斑竹的耐心指导,不过您说得这样也有局限性。只限于单个的导航窗口于单层的字窗口之间的一对多控制,如果各个子窗口之间互访的话就比较麻烦了,在你的建议下我又做了一点修改。

这种思路再加上系统自定义菜单,应该是一个比较通用的开发组件。

[attach]18445[/attach]
这里我还有一个问题,当我定义用户为只读用户时,如果窗口里面有子窗体数据表时,我只希望用户能够察看而不能删除、修改。

但是我定义Locked=True时虽然不可以修改、添加但是可以删除整行!!

而定义enable=False时连数据表的滚动条都无效了,也无法正常察看,请问怎么解决这个问题?!!
作者: olegoleg    时间: 2006-10-22 22:23
谢谢!下载学习学习。




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3