pb如何自动生成有规律的编码

如果此编号为主键用access数据库则设置为自动增长不用管了如果需要自定则1取得数据库最大值(定义必须为字符串类型否则不会显示前面几个00)string ls_bhselect max(编号) into :ls_bh form 表 2取得最大值后转换+1并且继续转换成字符串类型ls_bh=string(long(bh)=1,"000000")几个0是掩码必须加的3写入数据库

sting s_no

int lb,no//lb 为大类代码，no为顺序号

lb=select 大类名 from 表

no = select max(序号) from 表

sno= year(datetime(today)) + month(datetime(today)) + string(lb) + string(no+1)

---