중복값 제거 방법 (List 이용)

    '중복값을 확인후 제거하기 위해 별도 List로 저장
            Dim List As List(Of String) = New List(Of String)
            For i = 0 To count - 1
                List.Add(Split(Split(s, "/")(i), "colorHex")(1))
            Next

            '별도 List로 저장된 것중 중복값 제거한 값만 lsv에 추가
            Dim N_List As List(Of String) = List.Distinct().ToList
            For j = 0 To N_List.Count - 1
                lsv.Items.Add(N_List(j).ToString)
            Next