该怎么分类添加项目编号?在线等

xujianglong

分类添加项目编号记录,我想实现图1这样的效果,可是却是图2这样的结果.

Set db = CurrentDb

Set tb = db.OpenRecordset("送货编号表")

tb.AddNew

tb(字段变量) = Format(Val(最大编号) + 1, "00000")

With tb
.Update
.Close
End With

请问该如何修改这段代码?

fan0217

没有看明白是怎样一回事。

wuaza

虽然看明白怎么回事了，但就现有的表结构是不大好处理。

建议一个客户一张编号表。

mednewbee

使用 dcount可以实现，自己琢磨一下。嘿嘿

一点通

表结构错误,不应一个客户一个字段的,对使用\维护都十分不方便,只留一个客户编号列就行了,客户的区分只要用前N位数来识别

xujianglong

mednewbee老兄说得有道理哦，dcount函数可能可以实现，dcount可以确定记录数，但该怎么根据记录数赋值呢？tb.addnew不行，tb.edit好象也不行啊