Convert Datatable as Enumerable to List(Of String)

Question

I have datatable dt in the following line of code:

Dim str As List(Of String) = dt.AsEnumerable().Select(Function(a) New With {.WorkZone = a.Field(Of String)(