¿Sintaxis de inicialización de colección en Visual Basic 2008?

Question

Estoy tratando de determinar si hay una manera en Visual Basic 2008 (edición expreso si lo que importa) para hacer la inicialización de recogida en línea, al estilo de JavaScript o Python:

Dim oMapping As Dictionary(Of Integer, String) = {{1,"First"}, {2, "Second"}} 

sé Visual Basic 2008 es compatible con la inicialización del campo así, pero parece que no puedo hacer que funcione para colecciones ... ¿Tengo la sintaxis incorrecta, o simplemente no está implementada?

Answer 1

Visual Basic 9.0 no es compatible todavía. Sin embargo, Visual Basic 10.0will.

Answer 2

Puede lograrlo usando String() ToDictionary en esta forma intrincada de una línea:.

Dim kv As Dictionary(Of Integer, String) = _ 
     New String() {"1-first", "2-second", "3-third"}.ToDictionary(_ 
     Function(s) CInt(s.Substring(0, s.IndexOf("-"))), _ 
     Function(it) it.Substring(it.IndexOf("-") + 1)) 

No es muy elegante manera pero útil en absoluto.

Answer 3

Aquí están VB collection initializers usando la De palabra clave. (A partir de Visual Studio 2010)

lista:

Dim list As New List(Of String) From {"First", "Second"} 

Diccionario:

Dim oMapping As New Dictionary(Of Integer, String) From {{1, "First"}, {2, "Second"}}