Foxtable(狐表)用户栏目专家坐堂 → [求助]第一列的唯一值生成目录树对第二列筛选


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

主题:[求助]第一列的唯一值生成目录树对第二列筛选

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


加好友 发短信
等级:四尾狐 帖子:812 积分:6688 威望:0 精华:0 注册:2014/11/26 12:32:00
[求助]第一列的唯一值生成目录树对第二列筛选  发帖心情 Post By:2018/1/31 22:32:00 [只看该作者]

第一列的唯一值生成目录树对第二列筛选
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:第一列的唯一值生产目录树对第二列筛选.foxdb

[此贴子已经被作者于2018/1/31 22:33:08编辑过]

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


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

没看懂你例子要表达的意思。

 

你要生成怎样的目录树?有几层?每一次什么内容?

 

点击目录树如何对第二列筛选?


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


加好友 发短信
等级:四尾狐 帖子:812 积分:6688 威望:0 精华:0 注册:2014/11/26 12:32:00
  发帖心情 Post By:2018/1/31 23:51:00 [只看该作者]

想实现的效果,上传项目的第一列中提取到的不重复值为:

广东

2018

北京

上面4个不重复值生产目录树,可以筛选表第一列中含该值的行。

上面4个不重复值,同时实现多选筛选表第一列中含该值的行。


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


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

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:第一列的唯一值生产目录树对第二列筛选 (2).foxdb


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


加好友 发短信
等级:四尾狐 帖子:812 积分:6688 威望:0 精华:0 注册:2014/11/26 12:32:00
回复:(有点甜)[upload=foxdb,第一列的唯一值生产目...  发帖心情 Post By:2018/10/23 11:51:00 [只看该作者]

 大师,当第一列,空值时,目录树也是空值,目录树要不显示空值,下面代码怎么修改呢? 谢谢

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
For Each dr As DataRow In DataTables("表A").DataRows
    For Each s As String In dr("第一列").split(",")
        If trv.Nodes.Contains(s) = False Then
            trv.nodes.Add(s)
        End If
    Next
Next

[此贴子已经被作者于2018/10/23 11:55:13编辑过]

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


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

If trv.Nodes.Contains(s) = False Then

 

改成

 

If s > "" andalso trv.Nodes.Contains(s) = False Then


 回到顶部