Foxtable(狐表)用户栏目专家坐堂 → 如何勾选删除行


  共有1838人关注过本帖树形打印复制链接

主题:如何勾选删除行

帅哥哟,离线,有人找我吗?
fengqing63
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:8 积分:137 威望:0 精华:0 注册:2016/11/28 23:51:00
如何勾选删除行  发帖心情 Post By: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行删除了,希望有老师帮忙解答一下,谢谢了

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109720 积分:558310 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By: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
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:8 积分:137 威望:0 精华:0 注册:2016/11/28 23:51:00
回复:(有点蓝)Dim drs As List(Of DataRow)drs = D...  发帖心情 Post By:2016/11/29 10:40:00 [只看该作者]

还是不对哦,我删除时,不是勾选的被删除,而是其他的被删除了

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By: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

 回到顶部