Distinct en datatable

.NET VB.NET

Cuando le hacemos un select o un compute a un datatable, no tenemos la opción de hacerle un "distintc". Pero existe otra manera, utilizando Linq.

A continuación les dejo un ejemplo sencillo. Le hace un distinct a una columna y el resultado se lo inserta a un List Of.

Dim lstMonedas As New List(Of Integer)

 Dim monedas = From prod In ds.Tables(0) _
                       Select prod.Item("cfMoneNcod") _
                       Distinct


 For Each m In monedas
     lstMonedas.Add(m)
 Next