以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何删除dt.select找到的dr  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=69060)
--  作者：loongtai
--  发布时间：2015/5/29 16:55:00
--  [求助]如何删除dt.select找到的dr
如题
Dim drs As new List(of DataRow)
drs=CurrentTable.DataTable.sqlSelect(filter)
For Each dr As DataRow In drs
    dr.delete
Next
With CurrentTable.DataTable
    .loadfilter=""
    .load
End With
执行完以后，发现符合要求的dr并未删掉。这是怎么回事？如何删除dr?
--  作者：Bin
--  发布时间：2015/5/29 16:56:00
--  
CurrentTable.DataTable.Deletefor(Filter)  搞定.
--  作者：狐狸爸爸
--  发布时间：2015/5/29 16:57:00
--  

http://www.foxtable.com/help/topics/2899.htm

 

 
--  作者：大红袍
--  发布时间：2015/5/29 16:59:00
--  
Dim drs As new List(of DataRow)
drs=CurrentTable.DataTable.sqlSelect("")
Dim idx As String = ""
For Each dr As DataRow In drs
    idx &= dr("_Identify") & ","
Next
CurrentTable.DataTable.SqlDeletefor("[_Identify] in (" & idx.Trim(",") & ")") 
With CurrentTable.DataTable
    .loadfilter=""
    .load
End With
--  作者：loongtai
--  发布时间：2015/5/29 17:47:00
--  
大红袍的方法是我所期望的。谢谢！