【发布时间】:2020-02-06 22:21:52
【问题描述】:
我使用 Access 来维护我处理的案件的列表(包含详细信息)(我是一名法律专业人士)。我希望 Access 为每个案例添加一个唯一的案例标识符。我使用表格将数据输入到数据库中。
我编写了这个非常简单的代码来添加 Case ID nr:
Private Sub Command81_Click()
If Not IsNull(Me.Case_ID) Then
DoCmd.CancelEvent
Else
Command81.Enabled = True
Me.Case_ID = Me.Combo321 + Format(Me.[Date Original Event], "yymmdd") + Format(Time, "hhmmss")
End If
End Sub
我的想法是我填写表单中的不同字段,然后单击一个按钮以添加案例 ID(列在文本框(在表单中)和名为“Case_ID”的字段(在数据库中))。
当我点击按钮时,它应该检查是否已经有一个案例 ID。如果有它不会创建一个新的。如果没有,将根据案例发生的国家/地区 (Combo321) + 原始事件发生的日期 + 我创建案例 ID 的时间创建新的案例 ID。
从下拉菜单中选择案件发生的国家 (Combo321)。下拉菜单中的选项来自包含国家/地区列表的表格:
荷兰、英国、德国等
如果可能,我想在下拉菜单中保留(完整)国家/地区名称列表,但在 ID 的情况下使用 2 或 3 个字符的缩写。因此,如果我从下拉菜单中选择案件发生在荷兰,我希望案件 nr 以 NL 开头,如果案件发生在英国,我希望案件 Nr 以英国开头,等等。
是否可以在带有国家名称的表中创建带有缩写的第二列,然后在代码中以某种方式使案例 ID 以“属于”相关条目的第二列中的条目开头我从下拉菜单中选择的第一列(国家全名)?
或者也许还有其他方法可以做到这一点?
【问题讨论】: