Ms access ms访问中的序列号

我想在我的订单中创建序列号，在保存按钮后，它会在表格的订单号字段中生成一个订单号，因为我对VBA不太了解，但从internet上获得了一些代码，我试图实现这些代码，但不起作用 下面给出了代码，如果有任何编辑或错误，请参阅回复

表: ID |日期|方名|订单号|项目|数量|费率|金额|

   Private Sub save_Click()

If Me.orderno = Null Then
Me.orderno = Nz(DMax([Order No], Order), 0) + 1

End If 


End Sub

---

如果表的名称为“订单”，则以下内容应适用：

如果为空（Me.orderno），则
Me.orderno=Nz（DMax（“[订单号]”，“订单”），0）+1
如果结束

其他一些评论：

• Date

  是保留字，不应用作字段名，因此最好更改它以避免出现问题

• 在字段名中使用空格也是一种糟糕的做法

这里的问题很明显，但是，为了将来的参考，您应该说明您接收到的错误以及错误发生在哪一行。”“不工作”并不能提供任何线索

添加行 DoCmd.RunCommand acCmdSaveRecord 最后，确保记录已保存。 确保代码实际正在运行，并且orderno绑定到字段orderno。 如果它仍然不起作用，请逐步检查代码以查看发生了什么。

---

至于有关自动编号的注释，如果您不关心编号顺序中的间隙，则自动编号是可以的，这最终将使用自动编号出现。

单击按钮不会生成订单号&我已经删除了字段之间的空格，并且日期更改为ODATE，将

ID

列设为自动编号列，它将是每个订单上的订单号。您不需要单独的列。