Question

access数据库的自动编号的记录删除了如何让后面的记录号自动-1，把这个删除的记录补上啊

比如说有10条记录，删除了第五条，如何让第六条自动变成第五条，后面的类推

Answer 1

如果单就特性来说，access的自动编号是不可以释放重新排序的。

但是你可以通过其他方法来实现：

1、手动方式：直接打开数据库，删除原来的自段，然后重新添加。

2、用程序实现。
建一个过度表，将数据保存到此表；
删除原来的表，并新建一个表；
将数据重新插入到新表中。

具体代码就不帖了，网上很多。

Answer 2

这种情况就不要用自动编码的字段,自己在程序中手动维护

在删除时,如果删除为'5'的记录,则 update 表 set 编号=编号-1 where 编号>5
当然经,在程序中如果不是用的自动编码的字段来做的自增字段,还有好多地方需要注意.

至于一楼的方案2,则太不可取了.开销太大..要新建表,转移数据,插入数据..
数据量一多.则需要很长的时间..

Answer 3

If rs1.RecordCount > 0 Then
For i = 1 To rs1.RecordCount
rs1.Fields(0) = i
rs1.MoveNext
Next i
Set MSHFlexGrid1.DataSource = rs1
MSHFlexGrid1.ColWidth(0) = 100
End If
对编号重新编号，你看看吧，可能对你有用