以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  目录树,点击文字,如何打开窗口啊?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=15212)

--  作者:akzzwj
--  发布时间:2011/12/16 9:57:00
--  目录树,点击文字,如何打开窗口啊?
目录树,点击文字,如何打开窗口啊?
--  作者:akzzwj
--  发布时间:2011/12/16 10:06:00
--  
在吗?有人在吗?
--  作者:kevin
--  发布时间:2011/12/16 10:17:00
--  

首先要知道你的目录树是什么样子,如果你上传实例,会解决的人比较多;

 


--  作者:blackzhu
--  发布时间:2011/12/16 10:23:00
--  
目录树的节点名字是不是和窗口一样的?
--  作者:akzzwj
--  发布时间:2011/12/16 10:28:00
--  

目录树的节点名字和窗口的名字是一样的

 


--  作者:akzzwj
--  发布时间:2011/12/16 10:29:00
--  
上面的两位 哥哥 代码该怎么写啊?
--  作者:狐狸爸爸
--  发布时间:2011/12/16 10:30:00
--  

Select Case e.Node.Text
    Case "名称1"
        \'在此加入相应的代码
    Case "名称2"
        \'在此加入相应的代码
    Case "名称3"
        \'在此加入相应的代码
    Case "名称4"
        \'在此加入相应的代码
End Select
 
打开窗口的代码是:
Forms("窗口名称").Open()

 


--  作者:akzzwj
--  发布时间:2011/12/16 10:31:00
--  

其实也就是 如何实现 目录树 管理窗口


--  作者:狐狸爸爸
--  发布时间:2011/12/16 10:34:00
--  

用目录树管理表的:

http://www.foxtable.com/help/topics/2244.htm

 

管理窗口是一样,只是打开对应窗口的代码是:

Forms("窗口名称").Open()


--  作者:akzzwj
--  发布时间:2011/12/16 11:03:00
--  

Select Case e.Node.Text
    Case "职务管理"
        \'Forms("职务管理").Open()
    Case "岗位管理"
        \'Forms("岗位管理").Open()
    Case "职称管理"
        \'Forms("职称管理").Open()
    Case "专业管理"
        \'Forms("专业管理").Open()
    Case "学历管理"
        \'Forms("学历管理").Open()
End Select
输入了上面的代码,按确定 就提示下面这个:

 


图片点击可在新窗口打开查看此主题相关图片如下:未命名-1.png
图片点击可在新窗口打开查看