如何使用 VBA 在 ms 访问表单中创建自定义自动编号？ [关闭]

Posted 2023-03-28

【中文标题】如何使用 VBA 在 ms 访问表单中创建自定义自动编号？ [关闭]

【英文标题】：How to create a custom autonumber in ms access form using VBA? [closed]

【发布时间】：2021-03-04 13:53:27

【问题描述】：

我的产品表中有一个名为“代码”的主键字段。我也有那个表格的表格。我需要以 GK01、GK02 等形式自动生成“代码”。我尝试了 Dmax 函数，但它不起作用，可能是因为“代码”字段在文本中（运行时错误 94：无效使用 Null）。

我还尝试了通过格式化（字段属性格式选项）访问标准自动编号，例如 Gk'00'。它有效，但此字段与“代码”为数字格式的其他表相关。所以它与关系冲突。

现在我想使用 VBA 在表单中创建上述格式的自动编号。 请帮忙...

【参考方案1】：

万岁...我有一个解决方案。我在 Products 表中创建了一个名为 ID 的自动编号字段。然后在表单产品名称字段中，我添加了一个更新后事件过程，如下所示：

Private Sub ProductName_AfterUpdate()
    Me.Code.Value = "GK" & Me.ID.Value
End Sub 

它运行良好。感谢所有试图解决它的人。

【讨论】：

还有更简单的方法。使用 AutoNumer 字段作为代码，然后将文本框格式化为"GK"#。