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() 这个对不对?貌似没起作用