nel mio esempio parto da un datatable

codice:
Dim dt As DataTable = ***

Dim result = From c In dt.AsEnumerable()
             Where CInt(c("id_regione")) > 0
             Order By CInt(c("id_regione")) Descending
             Select New With
                {
                    .id = CInt(c("id_regione")),
                    .nome = CStr(c("nome_regione"))
                }

Me.GridView1.DataSource = result
Me.GridView1.DataBind()