设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

access如何用代码在“默认值”里实现自动编号?单据流水号生成问题。

2007-8-12 09:55| 发布者: admin| 查看: 2311| 评论: 0

简述:

单据流水号生成问题

问题:

如何用代码在“默认值”里实现自动编号?单据流水号生成问题。

如何用代码在“默认值”里实现自动编号?
如果我想实现不同类型的自动编号,我应该怎么设置代码呢?
如:第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


当然,知道原理以后你一定要用更改表的“默认值”的方法来实现也未尝不可,但个人觉得没必要。

最新评论

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-4-27 13:10 , Processed in 0.060388 second(s), 16 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

返回顶部