这样的用于自动编号的文本框该怎么设置？

wuaza

窗体上有一个文本框是形如“20040123”的，我想实现当添加新记录时该字段在原来的基础上加1，即新记录中的该字段变成“20040124”。而到了2005年1月1日添加第一个记录时变为“20050001”，以后的记录就跟着加1，即”20050002”，“20050003”。

请问以上的要求能实现吗，该怎么做？

zyp

取得当年最后一笔记录的编号字段加1即可获得新编号当月记录为空时，则赋默认值=year(date)*10000+1不过建议将编号字段设为文本类型，要进行运算时，用Clng转换为数字

wuaza

谢谢zyp的指导，我参考了你的意见，后来研究出这么一个方法成功了：    If DCount("编号", "表", "编号 like year(date())&'*'") = 0 Then

   编号 = Year(Date) & "0001"

    Else

   编号 = IIf(IsNull(编号), 0, 编号) + 1

    End If