以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助] (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=62571) |
-- 作者:yjd -- 发布时间:2015/1/4 20:38:00 -- [求助] 多值列有多项数据,如何筛选出大于四项数据的行。 |
-- 作者:有点甜 -- 发布时间:2015/1/4 20:43:00 -- 做不到的,必须循环每一行,然后循环每一个值,比较才知道的。 |
-- 作者:yjd -- 发布时间:2015/1/4 20:49:00 -- 能不能通过代码,设置大于四项的语句。 |
-- 作者:有点甜 -- 发布时间:2015/1/4 20:55:00 -- Dim idxs As String = "" For Each dr As DataRow In DataTables("表A").Select("第四列 is not null") If dr("第四列").split(",").length >= 4 Then idxs &= dr("_Identify") & "," End If Next Tables("表A").Filter = "_Identify in (" & idxs.Trim(",") & ")" |
-- 作者:yjd -- 发布时间:2015/1/4 20:58:00 -- 非常感谢。 |
-- 作者:yjd -- 发布时间:2015/1/5 10:14:00 -- Post By:2015-1-4 20:55:00 [只看该作者] Dim idxs As String = "" For Each dr As DataRow In DataTables("表A").Select("第四列 is not null And [等三列]>=50000”) If dr("第四列").split(",").length >= 4 Then idxs &= dr("_Identify") & "," End If Next Tables("表A").Filter = "_Identify in (" & idxs.Trim(",") & ")" 老师您看我用And加条件可以吗?谢谢 |
-- 作者:有点甜 -- 发布时间:2015/1/5 10:16:00 -- 可以。条件可以随便写。 |