''''''''''''''''获取日期
'For R As Integer =0 To Tables("统计").Rows.Count -1
'Dim dr As DataRow
'dr = DataTables("AA").SQLFind("[编号] ='" & Tables("统计").Rows(r)("编号") & "' and 日期 >='2014-01-01' ")
'If dr IsNot Nothing Then
'Tables("统计").Rows(R)("日期") =dr("outdate")
'End If
'Next
''''''''''''''''获取日期
Dim lst1 As New List(of DataRow)
lst1= DataTables("AA").SQLSelect("日期>='2014-01-01' ")
以上代码数据多执行速度慢,请问集合的方式 DataTables("统计")表中 的 日期列 怎么取值