老师, 临时表不能使用Sqlfind?
例如 Dim tb2 As WinForm.Table = e.Form.Controls("Table2")
Dim tb3 As WinForm.Table = e.Form.Controls("Table3")
tb2.Table.DataTable.LoadFilter="timebegin='" & Format(Date.now(), "yyyy-MM-dd") &"'"
tb2.Table.DataTable.Load()
If tb2.Table.Rows.Count>0 Then
Dim dt As DataTable=tb2.Table.DataTable
Dim dt1 As DataTable=tb3.Table.DataTable
Dim dr As DataRow= dt1.find("timebegin='" & Format(Date.now(), "yyyy-MM-dd") &"'")
Dim drs As List (of DataRow)=dt.sqlSelect("timebegin='" & Format(Date.now(), "yyyy-MM-dd") &"'")
If dr Is Nothing Then
Dim dr1 As DataRow = dt1.AddNew()
dr1("timebegin") = Date.now()
For Each dr2 As DataRow In drs
dr1(dr2("Valueid")) = dr2("idvalue")
Next
Else
For Each dr3 As DataRow In drs
dr(dr3("Valueid")) = dr3("idvalue")
Next
End If
End If
不想加载数据进来,怎么写?