此表A是外部表,在打开项目文件的时候,只是加载了一部份时间的数据。 现在要按某条件显示所有历史数据(不只是显示加载的这段时间的数据, 还要显示没有加载的数据)。
If Forms("窗口1").Opened Then
With DataTables("表A")
Dim r As Row = e.Table.Current
Dim s As String = "编号 = '"& r("编号") &"'"
If r.Isnull("姓名") Then s = "1=2"
Dim drs As List(Of DataRow) = e.Table.DataTable.Select(s & " And _Identify <> " & r("_Identify") & " And (日期 <= #" & r("日期") & "# Or 日期 Is Null)", "日期 Desc" )
' 这是在currentchanged事件里面最前段代码
...
...
...
这段代码只是显示加载的这一段时间的数据,不能显示所有。 要怎么修改一下呢?
[此贴子已经被作者于2018/10/16 18:56:38编辑过]