Supposing the referenced List below contains 2 elements:
List
Dim Countries = From c In List _ Select New With { .Country = c.Country
Dim Countries = From c In List _ Select New With {.Country = c.Country, .CountryID = c.CountryID }.Distinct()