以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助，根据姓名列进行筛选，去除姓名重复的行  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=146612)
--  作者：温馨的大树
--  发布时间：2020/2/27 15:36:00
--  求助，根据姓名列进行筛选，去除姓名重复的行
求助，尝试了多次，根据姓名列进行筛选，去除姓名重复的行，代码还是不对，麻烦指教一下哪里不对啊？谢谢
For Each r As DataRow In DataTables("表A").DataRows
    Dim drs As new List(of DataRow)
    drs = DataTables("表A").Select("[姓名] = \'r("姓名")\'")
    Dim m As Integer = drs.count
    If m >= 2
        For n As Integer = 1 To m-1
            drs(n).delete()
            Output.show(m)
        Next
    End If
Next
--  作者：sloyy
--  发布时间：2020/2/27 15:42:00
--  
你试试我这个代码