在Access中生成序列可以用以下两种方法：
方法一：使用自动编号字段
1.在表格中，创建一列为自动编号类型的字段。
2.对于每一条记录，Access会为该自动编号字段生成一个唯一的序列号。
方法二：通过计算字段生成序列
1.在表格中创建一个不带任何默认值的整数字段，用于存储序列号。
2.在查询设计视图中，创建一个计算字段，公式如下：序列号: DCount(“*”,”表名”,”【生成日期】>#” & Format([生成日期],”yyyy/mm/dd”) & “#”) + 1
3.将计算字段添加到查询列中，运行查询。
以上两种方法都可以生成序列号，具体使用哪种方法可以根据实际需要选择。
在 Access 数据库中生成序列有多种实现方式，以下介绍其中一种：
- 创建一个表，用来存储生成的序列值，如：SeqTable
- 在 SeqTable 中创建一个字段，用来存储序列的当前值，如：SeqValue
- 在代码中，实现一个获取序列值的函数，如：
Public Function GetSeq() As Long
Dim lngSeq As Long
CurrentDb.Execute “UPDATE SeqTable SET SeqValue=SeqValue+1”
lngSeq = DLookup(“SeqValue”, “SeqTable”)
GetSeq = lngSeq
End Function
- 在需要获取序列值的地方，调用该函数即可：
Dim lngSeq As Long
lngSeq = GetSeq()
通过这种方式，每次调用 GetSeq 函数时，都会在 SeqTable 中增加 SeqValue 的值，并返回当前的序列值，实现了序列号的生成。
发布者：luotuoemo，转转请注明出处：https://www.jintuiyun.com/159653.html
