以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  自动输入上月电表数的实现  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=157674)

--  作者:禾成
--  发布时间:2020/10/25 15:56:00
--  自动输入上月电表数的实现
因为工作原因有一段时间没回这个大家庭了,一打开这论坛亲切感由然而生!

转入正题,问老师一个问题:
如下图

图片点击可在新窗口打开查看此主题相关图片如下:360截图20201025155913364.jpg
图片点击可在新窗口打开查看
我想要实现新增行后,输入房号之后,能在本表查找所输入房号的最新一次的电表数自动填入到新增行的上月电表数里,
请问老师应该怎么做?

图片点击可在新窗口打开查看此主题相关图片如下:2.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2020/10/25 16:05:21编辑过]

--  作者:chnfo
--  发布时间:2020/10/25 17:05:00
--  
dim dr as datarow = e.datatable.find("房号=\'" & e.datarow("房号") & "\' and 年月份 <> #" & e.datarow("房号") & "#","年月份 DESC")
if dr isnot nothing then
e.datarow("上月电表数") = dr("当月电表数")
end if 
[此贴子已经被作者于2020/10/25 17:05:41编辑过]

--  作者:有点蓝
--  发布时间:2020/10/25 20:53:00
--  
以下是引用chnfo在2020/10/25 17:05:00的发言:
dim dr as datarow = e.datatable.find("房号=\'" & e.datarow("房号") & "\' and 年月份 < #" & e.datarow("房号") & "#","年月份 DESC")
if dr isnot nothing then
e.datarow("上月电表数") = dr("当月电表数")
end if 
[此贴子已经被作者于2020/10/25 17:05:41编辑过]

把<>改为<
--  作者:禾成
--  发布时间:2020/10/25 23:21:00
--  
谢谢指导!
--  作者:禾成
--  发布时间:2020/10/25 23:23:00
--  
这里报错时我查出来了,谢谢老师!