为访问表制作自定义主键答案

【问题标题】：Making custom primary key for access tables为访问表制作自定义主键
【发布时间】：2015-06-04 16:40:13
【问题描述】：

我正在寻找一种方法来为访问表创建自定义主键。我想做的是制作像'C01234'这样的东西。开头的字母表有一些目的，因此必须在那里。

我知道有一种方法可以使用自动编号的 PK 字段并使用 DMax 函数创建自定义字段。像这样的东西：Custom primary key for MS Access。但我正在寻找的是不使用另一个字段并完全使用代码生成字母数字 PK。

是否可以使用 Access 宏？有没有其他方法可以做到这一点？

【问题讨论】：

您的目标是什么版本的 Access？
我使用的是 MS Access 2013。但是没问题，我找到了解决方案，或者更确切地说，我认为我找到了解决方案。仍在验证中。

标签： forms ms-access

【解决方案1】：

如果使用表单，则使用 BeforeInsert 事件：

Dim Prefix As String
Dim Digits As Integer

Prefix = "C"
Digits = 5

Me!CustomID.Value = Prefix & Right(String(Digits, "0") & CStr(Val(Right(DMax("CustomID", "YourTable", "CustomID Like '" & Prefix & "*'"), Digits)) + 1), Digits)

【讨论】：

您好，感谢您的代码。如果我使用表格，我可以使用它。但是现在我找到了一种将宏放在表的插入事件之前的方法，这样无论我从哪里输入数据，它都会创建自动编号..