删除行 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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

共有2876人关注过本帖树形打印复制链接主题：删除行

ycs5801

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：五尾狐帖子：1068 积分：7624 威望：0 精华：0 注册：2009/6/24 9:44:00

删除行

Post By：2023/5/17 14:35:00 [只看该作者]

Dim drs As List(Of DataRow) = DataTables("事项进度").SQLSelect("主键编号= '" & dr("_Identify") & "'")
    For Each dr2 As DataRow In drs
        If Names2.Contains(dr2("录入人员")) = False Then '将现有行中需要删除的删除掉
            dr2.delete()
            dr2.Remove()
            dr2.Save()
        Else
            Names.Add(dr2("录入人员"))
        End If
    Next

上面代码dr2.delete() 这个对不对？貌似没起作用

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：111390 积分：567014 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2023/5/17 14:45:00 [只看该作者]

如果要删除符合条件的数据，一句就行了

DataTables("事项进度").SQLdeletefor("主键编号= '" & dr("_Identify") & "' and 录入人员 not in ('" & string.join("','",Names2.toarray) & "')")

下一主题 >> << 上一主题

主题：删除行