以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  集合数据处理  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=75288)

--  作者:农村人
--  发布时间:2015/10/3 14:52:00
--  集合数据处理
表A第一列中存储着如下数据内容
81105400
81725481
82063243
82302832
....
我在窗口文本框中,获取到部分数据,例如:81105400,81725481
我想通过点击按钮,找出在表A第一列中,与文本框对应的数据行,并让逻辑列改变TRUE/FALSE

--  作者:lsy
--  发布时间:2015/10/3 15:25:00
--  
For Each r As Row In Tables("表A").Rows
    r("第二列") = (Array.IndexOf(e.Form.Controls("TextBox1").Text.Split(","),r("第一列")) > - 1)
Next

--  作者:大红袍
--  发布时间:2015/10/4 10:56:00
--  

如代码

 

dim str as string = "1,2,3,4"
DataTables("表A").ReplaceFor("第二列", True, "第一列 in (\'" & str.Replace(",", "\',\'") & "\')")