主题：[求助]

多值列有多项数据，如何筛选出大于四项数据的行。

 做不到的，必须循环每一行，然后循环每一个值，比较才知道的。

能不能通过代码，设置大于四项的语句。

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(",") & ")"

非常感谢。

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加条件可以吗?谢谢

 可以。条件可以随便写。