| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 控件的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=90873) |
| -- 作者：天蝉一线 -- 发布时间：2016/9/23 14:13:00 -- 控件的问题 If Forms(dr("窗口菜单")).ExistControl(dr("窗口菜单"))=False Then MessageBox.show("没有这个菜单,请与系统管理员联系!","提示") Return endif 这段代码是判断TreeView1目录树的窗口菜单子目录是否存在相应的窗口，如果不存在就返回。可是没有实现，提示错误：没有不存在“Forms(dr("窗口菜单"))”的窗口。麻烦老师您看怎么改！
|
| -- 作者：有点蓝 -- 发布时间：2016/9/23 14:22:00 -- msgbox(dr("窗口菜单")) 弹出看看 调试技巧：http://www.foxtable.com/webhelp/scr/1485.htm
|
| -- 作者：天蝉一线 -- 发布时间：2016/9/23 14:29:00 -- 弹出的“用户管理”，实际上我还没做，我就是想通过代码判断这个控件存在与否，存在就执行，不存在提示错误返回。 |
| -- 作者：有点蓝 -- 发布时间：2016/9/23 14:40:00 -- If Forms.Contains(dr("窗口菜单")) = False OrElse Forms(dr("窗口菜单")).ExistControl(dr("窗口菜单"))=False Then MessageBox.show("没有这个菜单,请与系统管理员联系!","提示") Return End If
|
| -- 作者：天蝉一线 -- 发布时间：2016/9/23 14:52:00 -- 谢谢 |