Office中国论坛/Access中国论坛

标题: 在新纪录里面的自动递增的问题 [打印本页]

作者: pq318 时间: 2011-6-10 13:54
标题: 在新纪录里面的自动递增的问题
Me.Lable3.DefaultValue = "'" & Mid(Tempid, 1, 10) & Mid$(Tempid, 11, Len(Tempid) - 10) + 1 & "'"
我的流水号比如说是S110610A2-0001，关键是如上面的效果就是S110610A2-1，我要的是S110610A2-0001的效果，如何修改上面的代码达到这个效果啊，请教了

作者: pq318 时间: 2011-6-10 14:45
Me.Lable3.DefaultValue = "'" & Mid(Tempid, 1, 10) & Format(Val(Right(Tempid, 4)) + 1, "0000") & "'"
搞好了，呵呵，还是对函数了解的不够啊，重新学习了一下，谢谢大家了

作者: zhuyiwen 时间: 2011-6-10 22:02
恭喜，呵呵

作者: pq318 时间: 2011-6-13 13:28
谢谢斑竹

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)