以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求教 用目录树做菜单,双击2级目录树打开对应名称的窗口实例  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=132404)

--  作者:chen_sheng
--  发布时间:2019/3/21 10:06:00
--  求教 用目录树做菜单,双击2级目录树打开对应名称的窗口实例
求教 用目录树做菜单,双击2级目录树打开对应名称的窗口实例
--  作者:有点蓝
--  发布时间:2019/3/21 10:46:00
--  
NodeMouseClick事件

Forms(e.node.text).Open()
MainTable = Tables("表A")

--  作者:chen_sheng
--  发布时间:2019/3/21 11:49:00
--  
感谢,打开的是窗口  假如这个窗口不存在会报错
--  作者:有点蓝
--  发布时间:2019/3/21 12:03:00
--  
if forms.contains(e.node.text)
Forms(e.node.text).Open()
MainTable = Tables("表A")
end if