You can use for example LINQ to achieve a distinct list. For exammple something like the following if the datatype if the field is string:
Dim query = (From item In datatablename.AsEnumerable
Select item.Field(Of String)("FieldNameInDataTable")).Distinct
Just remember