Public Shared Function RemoveDuplicatedItems(ByVal array As String()) As String()
If Not (array Is Nothing) AndAlso (array.Length > 0) Then
Dim arrayTmp As New List(Of String)(array)
arrayTmp.Sort()
For i As Integer = arrayTmp.Count - 1 to 0 Step -1
If arrayTmp(i).CompareTo(arrayTmp(i - 1)) = 0 Then
arrayTmp.RemoveAt(i)
End If
Next
Return arrayTmp.ToArray()
Else
Return Nothing
End If
End Function