开头为0的发票号码如何自动递增？

cyber-bobo · 发表于 2010-5-8 11:44:44

一文本框录入发票号码，在这文本框的更新后事件中加入：
Private Sub 发票号码_AfterUpdate()
[发票号码].DefaultValue = [发票号码].Value + 1
End Sub
实现下一记录默认值自动递增1，问题是发票号码只能用文本格式，因为开头的几位都有可能为0，如：0013256，按上语句只能实现：13257，而不是：0013257

chaosheng · 发表于 2010-7-23 23:57:24

文本框的格式属性设置成：0000000 ，这样就行。

c101 · 发表于 2010-7-23 21:12:20

发票号码].DefaultValue = right([发票号码].Value + 10000001,7)

aslxt · 发表于 2010-7-23 20:15:30

[发票号码].DefaultValue = "'" & CStr(Format([发票号码] + 1, "00000000")) & "'"
没有问题的

yihesmxx · 发表于 2010-7-23 18:31:57

学习学习

mrd_wxqs · 发表于 2010-5-8 20:27:24

发票号码是要手工录入的，怎么可能是自动编号类型呢？晕
cyber-bobo 发表于 2010-5-8 17:47

同意９#观点，发票号递增是没有实际意义的！

cyber-bobo · 发表于 2010-5-8 17:47:45

发票号码是要手工录入的，怎么可能是自动编号类型呢？晕

todaynew · 发表于 2010-5-8 15:05:02

这样不行，发票号码肯定要可以录入并修改的嘛，因为发票是从税务局拿回来的，每次都不一样，但是每次都是连续的，所以才想到修改默认值的办法。
cyber-bobo 发表于 2010-5-8 14:48

cyber-bobo · 发表于 2010-5-8 14:48:34

这样不行，发票号码肯定要可以录入并修改的嘛，因为发票是从税务局拿回来的，每次都不一样，但是每次都是连续的，所以才想到修改默认值的办法。

michael100 · 发表于 2010-5-8 13:53:52

本帖最后由 michael100 于 2010-5-8 13:55 编辑

看看这个怎么样
呵呵,忘记说了,是输入金额时产生发票号码,发票号码字段为锁定状态

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[窗体] 开头为0的发票号码如何自动递增？

本帖子中包含更多资源

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)