Dim dv As New DataView() dv = ds.Tables("Employees").DefaultView dv.RowFilter = "employeeid >5"
ListBox1.Items.Clear() Dim buf As String Dim dr As DataRowView For Each dr In dv buf = "" buf &= dr("lastname").ToString()& ", " & dr("firstName").ToString() ListBox1.Items.Add(buf) Next