VB :: Lecture & TIPs

[VB.NET] 정보를 읽어온 배열에서 중복 값은 제외하고 나머지만 저장하기

말 그대로 데이터를 쭈욱 읽는데 중복되는 데이터는 빼고 다른것만 저장하는 방법입니다.
뭐 이중 루프 쓰면 쉽게 할 수는 있지만 좀 더 실용적은 방법이 있어 공유합니다.
( SQL 쿼리에서 distinct 와 같은 기능을 만드는 겁니다. )

Dim AddCafeList As New List(Of String) '<== 데이터를 저장할 배열입니다.
For Each tmpCafe As String In CafeList '<== CafeList 는 매장명이 중복으로 들어가 있는 문자열 배열입니다. 이걸 For Each로 루프 돌면서 읽습니다.
   If Not AddCafeList.Exists(Function(value As String)
                              Return value = tmpCafe
                          End Function) Then
        AddCafeList.Add(tmpCafe)
    End If
Next

간단하면서도 어렵죠?

ShopList 라는 중복문자배열을 For Each 로 루프 돌면서 하나씩 tmpShop 문자열에 넣습니다.
한 개씩 읽은 값을 List 객체의 Exists 메서드를 이용해서 있는지 없는지 찾고
해당 값이 존재하지 않는 경우에 한해서 List 객체에 추가 (Add) 하는 기법입니다.
다른 코딩보다 간단해서 참고하시라고 알려드립니다.

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out /  Change )

Google photo

You are commenting using your Google account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )

Connecting to %s

%d bloggers like this: