Dim dt as new Datatable
 
  'Demo-Daten
  dt.Columns.Add("SP1", GetType(Integer))
  For i As Integer = 1 To 10
      dt.Rows.Add(i)
  Next i
 
  Dim dv As DataView = dt.DefaultView
  dv.RowFilter = "SP1 > 5"
 
  For i As Integer = 0 To dv.Count - 1
     Console.WriteLine(dv(i)(0))
  Next i