以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  绑定特殊列  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=150820)
--  作者：yangwenghd
--  发布时间：2020/6/8 16:22:00
--  绑定特殊列
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table

老师，这个列表可以是被筛选过的吗？
比如分别在第三列相同的行中检查第一列最大的行的第四列是不是0，如果是0，点击控件下按钮就不出现在里面，如不是零就显示在里面。感谢 感谢 。

图片点击可在新窗口打开查看此主题相关图片如下：qq截图20200608162138.jpg
图片点击可在新窗口打开查看
--  作者：有点蓝
--  发布时间：2020/6/8 17:00:00
--  
Dim lst As List(of String) = DataTables("表A").GetValues("第三列")
Dim lst2 As new List(of String)
For Each s As String In lst
Dim dr As DataRow = DataTables("表A").Find("第三列=\'" & s & "\'","第一列 desc")
If dr IsNot Nothing AndAlso dr("第四列")=0 Then Continue For
lst2.Add(s)
Next
e.Form.Controls("ComboBox1").ComboList = String.Join("|",lst2.ToArray)