如何自动编号？？请大家帮忙

jimchen

在做一个采购单管理系统，要求主表里面的主键字段，“采购单号”能够自动生成，并且连号的。格式如下：

  MT080001

"MT" +"年份“"+序号

1、在表设计是能不能做好？

2、或者在窗体设计时候做好。

请大家帮忙！谢谢

tdhgj

Private Sub 记录ID_Enter()
Me.记录ID = "MT"&Format(Date, "yy") & Format(Nz(DMax("Right(记录ID, 5)", "表名", "left(记录ID,4)='" & Format(Date, "yy") & "'")) + 1, "00000")
End Sub

[ 本帖最后由 tdhgj 于 2008-6-19 17:05 编辑 ]

阿六爱狗

学习了

dbbygzy

学习了