> Dim xnameList As New List(Of String)(From row In table.AsEnumerable Select CStr(row("xname")))

VB のクエリ構文においては、
　From row In table.AsEnumerable()
や
　From row In table.Rows.Cast(Of DataRow)()
という処理を、もっと単純に
　From row In table
と書くだけでも同じ結果が得られます。蛇足までに。