Foxtable(狐表) → 用户栏目 → 专家坐堂 → 有没有类似追载的筛选办法？


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

主题：有没有类似追载的筛选办法？
帅哥哟，离线，有人找我吗？
pyh6918
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1135 积分：11099 威望：0 精华：2 注册：2008/9/1 10:45:00 		有没有类似追载的筛选办法？  发帖心情 Post By：2022/5/7 16:24:00 [只看该作者]

我有一个表，根据任一年度的分数先筛选出符合条件的专业，再将2021年的专业带出来一起显示（2021年的专业没有分数）。
1、因为用的是筛选，所以追载不能用。
2、用LOAD，因代码太长出错。一次可能筛选出几百个专业。
Dim filter As String
For Each dr As DataRow In DataTables("专业表").DataRows
    If filter > ""
        filter = filter & " or "
    End If
    filter = filter & "院校名称='" & dr("院校名称") & "' and 专业名称整理='" & dr("专业名称整理") & "'"
Next
DataTables("专业表").LoadFilter = "(" & filter & ") And 年度 In ('2021','2020',2019')
DataTables("专业表").Load

请问有什么好办法？谢谢！
 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110554 积分：562660 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/5/7 16:59:00 [只看该作者]


[此贴子已经被作者于2022/5/7 17:00:02编辑过]
 回到顶部
帅哥，在线噢！
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110554 积分：562660 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/5/7 17:02:00 [只看该作者]

请使用具体数据举例说明一下

 回到顶部
帅哥哟，离线，有人找我吗？
pyh6918
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1135 积分：11099 威望：0 精华：2 注册：2008/9/1 10:45:00 		  发帖心情 Post By：2022/5/7 17:07:00 [只看该作者]

数据是这样的：


图片点击可在新窗口打开查看此主题相关图片如下：a.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2022/5/7 17:08:08编辑过]
 回到顶部
帅哥，在线噢！
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110554 积分：562660 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/5/7 17:15:00 [只看该作者]

解释一下具体逻辑

 回到顶部
帅哥哟，离线，有人找我吗？
pyh6918
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1135 积分：11099 威望：0 精华：2 注册：2008/9/1 10:45:00 		  发帖心情 Post By：2022/5/7 20:26:00 [只看该作者]

如：我查询条件为2020年，702分。
可以查询出经济学类，这时只能筛选出2020年的经济学类。
我想在筛选出2020年的经济学类的同时，2021年的经济学类也显示。（2021年的数据没有分数）
 回到顶部
帅哥，在线噢！
狐狸爸爸
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00 		  发帖心情 Post By：2022/5/8 10:17:00 [只看该作者]

看不懂
 回到顶部
帅哥哟，离线，有人找我吗？
pyh6918
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1135 积分：11099 威望：0 精华：2 注册：2008/9/1 10:45:00 		  发帖心情 Post By：2022/5/8 20:10:00 [只看该作者]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:例1.rar


请老师帮忙看一下！
[此贴子已经被作者于2022/5/8 20:11:42编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
pyh6918
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1135 积分：11099 威望：0 精华：2 注册：2008/9/1 10:45:00 		  发帖心情 Post By：2022/5/9 9:31:00 [只看该作者]

顶

 回到顶部
帅哥，在线噢！
有点蓝
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110554 积分：562660 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/5/9 9:49:00 [只看该作者]

根据第一步的筛选条件做加载，试试：

dim filter as string = IIF(Tables("专业平均").Filter>"",Tables("专业平均").Filter,"1=1")

DataTables("专业表").LoadFilter = "院校索引+专业名称整理 in (select 院校索引+专业名称整理 from {专业表} where " & filter  & ") And 年度 In ('2021','2020',2019')
DataTables("专业表").Load
 回到顶部
总数 15 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 5 次数据查询