Vb.net 从组合文本文件中删除重复项

如何从输出文本文件中删除重复项？我可以在WriteAllines语句中添加一个不同的标记吗？如果是这样，它适合哪里

Public Class newsenatefrm
    Private Sub generatebtn_Click(sender As Object, e As EventArgs) Handles generatebtn.Click
        Dim sen = IO.File.ReadLines("C:\temp\Senate113.txt").ToList()
        sen.AddRange(IO.File.ReadLines("C:\temp\RetiredSen.txt"))
        sen.AddRange(IO.File.ReadLines("C:\temp\NewSen.txt"))


        IO.File.WriteAllLines("Senate114.txt", sen.OrderBy(Function(x) x.Split(","c)(1)))

    End Sub
End Class

---

首先使用不支持重复项的集合：

Public Class newsenatefrm
    Private Sub generatebtn_Click(sender As Object, e As EventArgs) Handles generatebtn.Click
        Dim sen = IO.File.ReadLines("C:\temp\Senate113.txt").ToHashSet()
        sen.UnionWith(IO.File.ReadLines("C:\temp\RetiredSen.txt"))
        sen.UnionWith(IO.File.ReadLines("C:\temp\NewSen.txt"))


        IO.File.WriteAllLines("Senate114.txt", sen.OrderBy(Function(x) x.Split(","c)(1)))

    End Sub
End Class

---

这看起来不像VBA。是VB.Net吗？请更正标记

sen.Distinct.OrderBy（…