Foxtable(狐表)用户栏目专家坐堂 → 如何实现取值到最后一次录入数据值


  共有3019人关注过本帖平板打印复制链接

主题:如何实现取值到最后一次录入数据值

帅哥哟,离线,有人找我吗?
lg_yaolong
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:230 积分:1949 威望:0 精华:0 注册:2019/1/16 21:25:00
如何实现取值到最后一次录入数据值  发帖心情 Post By: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

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

 回到顶部
总数 27 1 2 3 下一页