复制下面一条记录填充上面空白记录-蒋元根
Access软件网QQ交流学习群(群号码198465573),欢迎您的加入!
首页 >技术文章> Access数据库-模块/函数/VBA


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

发表时间:2013/7/10 17:19:04 评论(1) 浏览(8971)  评论 | 加入收藏 | 复制
   
摘 要:复制下面一条记录填充上面空白记录
正 文:

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


网友文 发表于: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群(群号:198465573)
 
 相关文章
[Access示例]Access新增记录时复制上一条记录的示例\具...  【竹笛  2008/9/8】
[示例]复制子窗体某一条记录  【umvsoft  2008/9/12】
【access源码】复制上面一条记录填充下面空白记录  【漏蛧尐魚℡  2012/5/10】
access VBA 复制一条记录到新记录  【Big Young  2013/2/23】
常见问答
技术分类
相关资源
文章搜索
关于作者

蒋元根

文章分类

文章存档

友情链接