Ms access access VBA编程如何对字段重新编号

嗯，我是一个很新的访问。在我的数据库中，有一个字段我希望用于排序目的。 如果我高亮显示一条记录（表视图）并执行该函数，它会执行以下操作：它会向数据库中添加一条新记录，其值与高亮显示的记录值相同，但排序字段会增加1。 最后，该函数修改将排序号等于或高于添加的记录排序号的所有记录的排序字段递增一。 我问的太难了吗？。我尝试了自动编号，但它不可编辑，所以我可以有我想要的特定排序顺序。有人能给我一个代码示例吗？有更简单的方法吗？ 任何帮助都将不胜感激

---

Michael

我不认为有一种简单的方法可以做到这一点（也许是数据宏？），但我建议您执行以下操作：

使用您的记录创建表单，可以使用连续视图和表单页眉/页脚，也可以使用数据表视图中的子表单中的记录创建未绑定表单

在表单页眉/页脚中添加一个按钮，该按钮将运行宏

宏应执行以下操作：

保存当前选定行的排序字段值

开始交易

执行

UPDATE

station更新所有后续排序字段值

从当前记录中获取值并将其嵌入

INSERT

语句中，最好使用参数。

INSERT

应将保存的排序字段值放入新记录中。执行

插入操作

结束交易

---

欢迎来到SO！请发布您为解决此问题而尝试编写的任何代码。你不应该期望别人为你写代码。