以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何实现取值到最后一次录入数据值  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=140454)

--  作者:lg_yaolong
--  发布时间:2019/9/5 23:05:00
--  如何实现取值到最后一次录入数据值
If e.DataCol.Name = "车号" Then
   If e.NewValue Is Nothing Then
       e.DataRow("上次_小时公里") = Nothing 
    Else
       Dim dr As DataRow       
       dr = DataTables("燃油录入").Find("[车号] = \'" & e.NewValue & "\'")
       If dr IsNot Nothing Then 
           e.DataRow("上次_小时公里") = dr("本次_小时公里")
       End If
   End If
End If

以上编码每次取值,都是第一次录入数据值。想实现取最后一次录入数据的值,请教老师如何实现。

--  作者:lg_yaolong
--  发布时间:2019/9/5 23:07:00
--  
“燃油表”中同一车号录入多次数据,只想用到最后一次录入数据
--  作者:有点蓝
--  发布时间:2019/9/6 9:27:00
--  
dr = DataTables("燃油录入").Find("[车号] = \'" & e.NewValue & "\'","[_Identify] desc")
--  作者:lg_yaolong
--  发布时间:2019/9/6 10:01:00
--  
感谢老师,也想这种方法了,排序,试试
--  作者:lg_yaolong
--  发布时间:2019/9/6 10:23:00
--  
老师,这种方法不行,按日期排序也不行,有什么好办法吗?也就是我想用到,同一车号,上次输入的数据,在本次中如何能找到
--  作者:有点蓝
--  发布时间:2019/9/6 10:25:00
--  
那么不管代码,用眼睛看,怎么知道哪个数据是上次输入的数据?
--  作者:有点蓝
--  发布时间:2019/9/6 10:26:00
--  
或者说您的表格用什么可以判断哪个数据是上一次录入的?
--  作者:lg_yaolong
--  发布时间:2019/9/6 14:41:00
--  
第1次数据:  车号 615/上次200/ 本次400; 第二次数据:车号615/上次400/本次600;第三次数据:车号615/上次600/本次800,上次数据就是本次数据的开始   图片点击可在新窗口打开查看
--  作者:lg_yaolong
--  发布时间:2019/9/6 14:56:00
--  
附件详情
--  作者:有点蓝
--  发布时间:2019/9/6 15:26:00
--  
如果开启了插入行功能,试试

dr = DataTables("燃油录入").Find("[车号] = \'" & e.NewValue & "\'","[_sortkey] desc,[_Identify] desc")