В примере кода, который вы разместили, имена свойств в инициализаторе анонимного объекта пишутся со строчной первой буквой. Вы уверены, что код на другом сайте действительно такой же? Я подозреваю, что он использует заглавные первые буквы:
Dim ggg = StaticData.GetLocationsByText(data, CountryId).Select( _
Function(o) New With { _
.Id = o.UniqueLocation, _
.Text = o.DisplayLocation}).ToList()