完成一个查询,返回一个DataTable后,很多时候都想在查询结果中继续搜索。这时可以使用DataTable.Select方法对结果进行再查询
Select方法有4个重载,我们经常用到的就是DataTable.Select(String)
这个String的参数是查询的限定式。相当于SQL查询语言中的WHERE语句(不含WHERE),其语法符合SQL语言语法。
Select方法的返回的是包含查询到的数据的DataRow,但是这个DataRow只是被查询的DataTable的一个映射,所以DataRow是随着DataTable的行变化而变化的。例如,DataTable的行都被删除了,那么DataRow中的数据同样被删除了(即便是先Select,再删除的)
所以,要想把返回的DataRow放进数据显示控件中,需要将其放入另一个DataTable中,如果直接放入原DataTable或将原DataTable的行全部清除再放入查询所得的数据都是不行的,程序会显示错误,错误提示是“表中已有此行”。
另外,在一个新表中插入行,不能直接用DataTable.Rows.Add(DataRow)的方式,因为这样是插入一个新表,也就是DataRow是空的。要用导入行的方式,DataTable.ImportRow(DataRow)。当然,前提是这个新表要有与原数据表一样的结构。
- Public Function SDEResearch(ByVal InputDT As DataTable, ByVal SearchStr As String) As DataTable
- '用来存储再查询后的数据表
- Dim ReSearchDT As DataTable = InputDT.Clone() '保证有与源数据表相同的表结构
- '用来存储查询后返回的datarow数组
- Dim ReSearchDR() As DataRow = Nothing
- Try
- ReSearchDR = InputDT.Select("NAME LIKE '%" + SearchStr + "%'") '只是从数据表中映射出来datarow(),所以不能删除原表中的行
- Catch ex As Exception
- Return Nothing
- End Try
- For i As Int16 = 0 To ReSearchDR.Length - 1
- ReSearchDT.ImportRow(ReSearchDR(i))
- Next
- Return ReSearchDT
- End Function
复制代码
|