Foxtable(狐表)用户栏目专家坐堂 → 目录树,点击文字,如何打开窗口啊?


  共有7656人关注过本帖树形打印复制链接

主题:目录树,点击文字,如何打开窗口啊?

帅哥哟,离线,有人找我吗?
akzzwj
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:529 积分:3605 威望:0 精华:0 注册:2011/10/11 17:20:00
目录树,点击文字,如何打开窗口啊?  发帖心情 Post By:2011/12/16 9:57:00 [只看该作者]

目录树,点击文字,如何打开窗口啊?

 回到顶部
帅哥哟,离线,有人找我吗?
akzzwj
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:529 积分:3605 威望:0 精华:0 注册:2011/10/11 17:20:00
  发帖心情 Post By:2011/12/16 10:06:00 [只看该作者]

在吗?有人在吗?

 回到顶部
帅哥哟,离线,有人找我吗?
kevin
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:359 积分:3403 威望:0 精华:0 注册:2011/8/2 20:53:00
  发帖心情 Post By:2011/12/16 10:17:00 [只看该作者]

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

 


 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57584 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2011/12/16 10:23:00 [只看该作者]

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

 回到顶部
帅哥哟,离线,有人找我吗?
akzzwj
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:529 积分:3605 威望:0 精华:0 注册:2011/10/11 17:20:00
  发帖心情 Post By:2011/12/16 10:28:00 [只看该作者]

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

 


 回到顶部
帅哥哟,离线,有人找我吗?
akzzwj
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:529 积分:3605 威望:0 精华:0 注册:2011/10/11 17:20:00
  发帖心情 Post By:2011/12/16 10:29:00 [只看该作者]

上面的两位 哥哥 代码该怎么写啊?

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251048 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/12/16 10:30:00 [只看该作者]

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

 


 回到顶部
帅哥哟,离线,有人找我吗?
akzzwj
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:529 积分:3605 威望:0 精华:0 注册:2011/10/11 17:20:00
  发帖心情 Post By:2011/12/16 10:31:00 [只看该作者]

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


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251048 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/12/16 10:34:00 [只看该作者]

用目录树管理表的:

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

 

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

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


 回到顶部
帅哥哟,离线,有人找我吗?
akzzwj
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:529 积分:3605 威望:0 精华:0 注册:2011/10/11 17:20:00
  发帖心情 Post By: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
图片点击可在新窗口打开查看

 回到顶部
总数 13 1 2 下一页