复制下面一条记录填充上面空白记录

时　间:2013-07-10 17:19:04
作　者:蒋元根   ID：193  城市：上海
摘　要:复制下面一条记录填充上面空白记录
正　文:

复制下面一条记录填充上面空白记录

网友文 发表于：2013-07-09 的题目
同一字段用下一条记录的值替换当前记录的值
http://www.accessoft.com/bbs/showtopic.asp?id=19136
我想问一下，在access数据库中，怎样对某一个字段实现用下一条记录的字段值代替当前记录中相应字段的值？
比如，表table中有一个字段是“汽车行驶速度”，但在这个字段下，该条记录值是0，下条记录该字段的值是“50”，我想用这个“50”去替换上面的“0”。而且都是相邻的记录值之间的替换，在其他记录中出现的值可能不是“50”，但我需要同样的方法去用有值的记录（值不为”0“）去替换前一个值为”0“的记录。

请参考：
漏蛧尐魚老师于2012-05-10 发表的文章
复制上面一条记录填充下面空白记录
http://www.accessoft.com/article-show.asp?id=6802


思路：
1：新建一个生成表查询并且把你的表ID按降序生成表2：
Select 表1.编号, 表1.ID, 表1.时间, 表1.车速信号, 表1.替换结果 INTO 表2
FROM 表1
orDER BY 表1.ID DESC;

2：把表2车速信号记录（第一条以外）中间的0替换为null ：
 Update 表2 SET 表2.车速信号 = Null
Where (((表2.车速信号)=0) AND ((表2.ID)<857));

3：复制上面一条记录填充下面空白记录；
见模块Mod以及窗体1代码：
Private Sub Command58_Click()
Call CopyFieldRecords("表2", "车速信号")
Me.Child.Requery
End Sub

4：更新查询：
Update 表1 INNER JOIN 表2 ON 表1.编号 = 表2.编号 SET 表1.替换结果 = [表2]![车速信号];

 

附   件:

Access软件网官方交流QQ群 (群号:54525238) 　　　　　　Access源码网店