access如何用代码在“默认值”里实现自动编号?单据流水号生成问题。
www.nanhushi.com 佚名 不详
问题: 如何用代码在“默认值”里实现自动编号?单据流水号生成问题。 如何用代码在“默认值”里实现自动编号? 如果我想实现不同类型的自动编号,我应该怎么设置代码呢? 如:第1号、第2号、...........、第198号.................. 或:CN0001-A、CN0002-B、CN0003-B、.........、CN0004-A、CN1998-B…… 是在默认值里输入代码呢,还是在什么地方,请指教,谢谢! 回答: 这些要求都不需要在“表”的字段属性中完成,一般都是在界面编程中解决的。 用 dcount() 或者 DMAX() 函数取值后用字符串组合的方法得到编号 Private Sub Field1_Enter() If IsNull(Field1.value) Then Field1.value = "CN" & Format(CLng(DMax("mid(field1,3,4)", "table1") + 1), "0000") & "-A" End If End Sub 当然,知道原理以后你一定要用更改表的“默认值”的方法来实现也未尝不可,但个人觉得没必要。