以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何勾选删除行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=93440)

--  作者:fengqing63
--  发布时间:2016/11/29 10:24:00
--  如何勾选删除行

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


代码如下:
With Tables("淘宝订单表")
    If .Rows.Count > 0 Then
        For i As Integer = .Rows.Count -1 To 0 Step -1
            If .Rows(i)("勾选") Then
                .Rows(i).Delete()
            End If
        Next
    End If
End With

勾选是逻辑行的

问题:例如我勾选695-696这2行,然后点删除,居然不是这2行删除了,是其他2行删除了,希望有老师帮忙解答一下,谢谢了

--  作者:有点蓝
--  发布时间:2016/11/29 10:37:00
--  
Dim drs As List(Of DataRow)
drs = DataTables("淘宝订单表").Select("[逻辑列] = true")
For Each dr As DataRow In drs
    dr.Delete
Next

--  作者:fengqing63
--  发布时间:2016/11/29 10:40:00
--  回复:(有点蓝)Dim drs As List(Of DataRow)drs = D...
还是不对哦,我删除时,不是勾选的被删除,而是其他的被删除了
--  作者:有点色
--  发布时间:2016/11/29 11:07:00
--  
Dim drs As List(Of DataRow)
drs = DataTables("淘宝订单表").Select("[勾选] = true")
For Each dr As DataRow In drs
    dr.Delete
Next