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
加好友 
发短信
Post By：2015/5/29 16:59:00 [显示全部帖子]
