以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  Tables(A)找出所有符合条件的行并且删除他!  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=108440)

--  作者:李小胖
--  发布时间:2017/10/23 10:20:00
--  Tables(A)找出所有符合条件的行并且删除他!
Tables(A)找出所有符合条件的行并且删除他!求代码思路
select 只能用于datatables 对么?

--  作者:有点甜
--  发布时间:2017/10/23 11:19:00
--  

 使用deletefor

 

Tables(A).DataTable.DeleteFor(Tables(A).Filter)

 

 如果用select

 

Tables(A).DataTable.Select(Tables(A).Filter)


--  作者:李小胖
--  发布时间:2017/10/23 11:28:00
--  
以下是引用有点甜在2017/10/23 11:19:00的发言:

 使用deletefor

 

Tables(A).DataTable.DeleteFor(Tables(A).Filter)

 

 如果用select

 

Tables(A).DataTable.Select(Tables(A).Filter)


出现错误


图片点击可在新窗口打开查看此主题相关图片如下:111.png
图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2017/10/23 13:11:00
--  
直接写2楼代码,改表名即可。
--  作者:李小胖
--  发布时间:2017/10/23 13:13:00
--  
以下是引用有点甜在2017/10/23 13:11:00的发言:
直接写2楼代码,改表名即可。

Filter 是用变量>?


--  作者:有点甜
--  发布时间:2017/10/23 13:59:00
--  

Dim filter As String = "第一列 = \'123\'"

Dim t As Table = Tables("表a")

filter = iif(t.filter>"", "(" & t.filter & ") and " & filter, filter)

t.DataTable.DeleteFor(filter)


--  作者:李小胖
--  发布时间:2017/10/23 18:22:00
--  
以下是引用有点甜在2017/10/23 13:59:00的发言:

Dim filter As String = "第一列 = \'123\'"

Dim t As Table = Tables("表a")

filter = iif(t.filter>"", "(" & t.filter & ") and " & filter, filter)

t.DataTable.DeleteFor(filter)





filter = iif(t.filter>"", "(" & t.filter & ") and " & filter, filter)  这句话是用来干什么的?不明白


--  作者:有点甜
--  发布时间:2017/10/23 18:37:00
--  

table是在datatable的数据上筛选出来的。如果table筛选过,那就在t.filter的基础上,再增加你的条件;如果table没筛选过,那直接使用你的条件即可。


--  作者:李小胖
--  发布时间:2017/10/24 10:08:00
--  
以下是引用有点甜在2017/10/23 18:37:00的发言:

table是在datatable的数据上筛选出来的。如果table筛选过,那就在t.filter的基础上,再增加你的条件;如果table没筛选过,那直接使用你的条件即可。


t.DataTable.DeleteFor(filter)  这句代码使用后 是删除哪个数据 ?datatable ,table  ,SQL 数据库    ?


--  作者:有点甜
--  发布时间:2017/10/24 11:57:00
--  

 根据条件,删除datatable的数据。也可以理解成删除table的数据。