[VB.NET] VB 에서 Collection 한줄로 생성하기

간만에 왔군요... ㅋㅋ

요즘 몇가지 일을 한꺼번에 하느라... 바쁘군요...

8월까지는 꼼짝마가 될 듯합니다.

그래도 틈틈히 할 건 해야겠기에... 또 무언가를 손에 들었습니다. ㅡㅡ'

 

C# 코드를 보다가 VB 로 코드를 바꾸는데 턱 하니 무언가에 부딪쳤습니다.

여러분들께는 기초적인 내용이겠지만... ㅋㅋㅋ

 

한참 찾았네요...

 

코드는 이렇습니다.

            var genres = new List<Genre>
            {
                new Genre { Name = "Rock" },
                new Genre { Name = "Jazz" },
                new Genre { Name = "Metal" },
                new Genre { Name = "Alternative" },
                new Genre { Name = "Disco" },
                new Genre { Name = "Blues" },
                new Genre { Name = "Latin" },
                new Genre { Name = "Reggae" },
                new Genre { Name = "Pop" },
                new Genre { Name = "Classical" }
            };

 

이걸 vb.net 코드로 ㅋㅋㅋ

어떤 분의 목소리가 들리는 듯 합니다.

이럴 거 뭐하러 vb.net으로 하냐고...

C# 으로 하라고... ㅋㅋ

하지만 그래도 가봅니다. ㅋㅋㅋ

 

다음은 이렇게 변환 합니다.

 

Dim genres1 As New List(Of Genre) From {
                New Genre With {.Name = "Rock"},
                New Genre With {.Name = "Jazz"},
                New Genre With {.Name = "Metal"},
                New Genre With {.Name = "Alternative"},
                New Genre With {.Name = "Disco"},
                New Genre With {.Name = "Blues"},
                New Genre With {.Name = "Latin"},
                New Genre With {.Name = "Reggae"},
                New Genre With {.Name = "Pop"},
                New Genre With {.Name = "Classical"}
                }

 

또는

 

            Dim genres As New List(Of Genre) From {
                New Genre("Rock"),
                New Genre("Jazz"),
                New Genre("Metal"),
                New Genre("Alternative"),
                New Genre("Disco"),
                New Genre("Blues"),
                New Genre("Latin"),
                New Genre("Reggae"),
                New Genre("Pop"),
                New Genre("Classical")
                }

 

요렇게요... ㅋㅋㅋ

두번째 코드는 parameter 가 있는 initializer 가 있어야 하는 거고요.

 

핵심은 From 과 With 에 있습니다.

 

머리 나쁜 제가 또 까먹을 듯 하여 올려봅니다.

 

그럼 행복한 고수되십시요...

 

woojja ))*

\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\