Office中国论坛/Access中国论坛

标题: 请教一个判定窗体是否打开的代码 [打印本页]

作者: williamwangc 时间: 2011-12-11 13:34
标题: 请教一个判定窗体是否打开的代码
RT.我写的窗体中，必须保证某个窗体处于打开状态。我要保证处于打开状态首先要判定它。请问这段代码该怎么写呢？

作者: roych 时间: 2011-12-11 15:35
用IsLoaded函数。
Docmd.OpenForm"窗体1"
If CurrentProject.AllForms("窗体1").IsLoaded Then
Msgbox "窗体1已经打开"
End If
当然，前提是先要执行OpenForm函数，再判断是否加载完毕，如果加载完毕了就是打开了。不执行这一步（OpenForm），系统是不会自动加载指定窗体的。

作者: williamwangc 时间: 2011-12-11 19:21
感谢版主。我也想到了ISLOADED了。不过我不知道ISLOADED到底怎么引用的。看到你的代码我知道了。
可是我用forms("窗体").isloaded无法应用isloaded.那么isloaded是在DAO里面的么？

作者: roych 时间: 2011-12-11 21:57
跟DAO或者ADO没关系吧？{:soso_e112:}，再说了，DAO里面也没有Form对象啊。
应该是在Access组件里用的。具体可以看看Andy的集成模块。我懒得去写了，O(∩_∩)O~
http://www.office-cn.net/thread-106028-1-1.html

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)