vb.net 数组去除重复

Public Function FilterRpeat(ByVal allUrls As String()) As String()  '去除重复函数，返回数组

  

      '这个对象用来存储非重复数据，我这里是去除重复域名，所以定义这个名字        

        Dim Lst_Domains As New List(Of String)()   

        Dim Str_Chongfu As String = string.empty

        For Each eachString As String In allUrls

            If Not Lst_Domains.Contains(eachString) Then

                Lst_Domains.Add(eachString)

            End If

        Next   '

        Return Lst_Domains.ToArray

    End Function