Foxtable(狐表)用户栏目专家坐堂 → 求教 用目录树做菜单,双击2级目录树打开对应名称的窗口实例


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

主题:求教 用目录树做菜单,双击2级目录树打开对应名称的窗口实例

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


加好友 发短信
等级:三尾狐 帖子:700 积分:6224 威望:0 精华:0 注册:2018/5/10 9:05:00
求教 用目录树做菜单,双击2级目录树打开对应名称的窗口实例  发帖心情 Post By:2019/3/21 10:06:00 [只看该作者]

求教 用目录树做菜单,双击2级目录树打开对应名称的窗口实例

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/3/21 10:46:00 [只看该作者]

NodeMouseClick事件

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

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


加好友 发短信
等级:三尾狐 帖子:700 积分:6224 威望:0 精华:0 注册:2018/5/10 9:05:00
  发帖心情 Post By:2019/3/21 11:49:00 [只看该作者]

感谢,打开的是窗口  假如这个窗口不存在会报错

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/3/21 12:03:00 [只看该作者]

if forms.contains(e.node.text)
Forms(e.node.text).Open()
MainTable = Tables("表A")
end if

 回到顶部