Foxtable(狐表)用户栏目专家坐堂 → [求助]窗口组合框列表代码与导航目录树节点代码


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

主题:[求助]窗口组合框列表代码与导航目录树节点代码

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/4/28 17:25:00 [只看该作者]

删除这句代码啊

 

Vars("Filter") = Tables("系统管理_Table1_Page13").Filter

 

在你目录树点击筛选的时候写代码

 

Vars("Filter") = Tables("系统管理_Table1_Page13").Filter


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


加好友 发短信
等级:一尾狐 帖子:493 积分:3637 威望:0 精华:0 注册:2018/6/8 21:14:00
  发帖心情 Post By:2019/4/28 17:41:00 [只看该作者]

谢谢老师耐心指导。实现了我想要的效果。

但还有一个小小的问题,就是如果在组合框选择“全部”时,不是当前目录树筛选的全部,而是所有的全部,这个能改为是当前目录树“筛选的全部”吗。还请老师费心。

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/4/28 17:48:00 [只看该作者]

If Txt = "" OrElse Txt = "全部" Then
    Tbl.Filter = ""
Else

 

改成

 

If Txt = "" OrElse Txt = "全部" Then
    Tbl.Filter = vars("filter")
Else

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


加好友 发短信
等级:一尾狐 帖子:493 积分:3637 威望:0 精华:0 注册:2018/6/8 21:14:00
  发帖心情 Post By:2019/4/28 18:26:00 [只看该作者]

谢谢老师。感谢老师不厌其烦的指导。

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


加好友 发短信
等级:一尾狐 帖子:493 积分:3637 威望:0 精华:0 注册:2018/6/8 21:14:00
  发帖心情 Post By:2019/4/28 20:34:00 [只看该作者]

谢谢老师。
[此贴子已经被作者于2019/4/28 20:45:58编辑过]

 回到顶部
总数 25 上一页 1 2 3