符鸿敏老师，你好！问一个按年份编号的问题

zhbw　发表于：2013-12-15 10:24:09 　

复制

Me.ID1 = IIf(IsNull(DLookup("ID", "学生表", "Mid([ID], 1, 4)中的1，4各代表什么

Top

大夏发表于：2013-12-15 16:50:20

1,表示从第一位数开始取4位数

4，表示取4个字符

Top

zhbw 发表于：2013-12-15 19:38:40

谢谢！如果是汉字或字符怎么计数？

Top

zhbw 发表于：2013-12-16 00:40:31

Me.ID = IIf(IsNull(DLookup("ID", "学生表", "Mid([ID], 1, 4) =" & "'" & Year(Date) & "'")), Year(Date) & "001", Year(Date) & Format(((Right(DLookup("max(ID)", "学生表", "Mid

l l 001

年份的开始位年份共几位数三位计数

([ID], 1, 4) =" & "'" & Year(Date) & "'"), 3)) + 1), "000"))

最后3位编码位数

有汉字的话算一位，符号也算一位,例如“前缀名[“是四位，从第5位开始

Top

奇玉发表于：2013-12-16 15:40:23

无论汉字或字符都算一个，你可以自己试一下，如姓名：赵小明 Mid([姓名],1,1) 取一位：赵， Mid([姓名],1,2) 取二位：赵小

刚看了符鸿敏老师的例子：如ID形如2013001格式，如果ID为空的话，就取2013001，不为空，取 : 2013004

Year(Date) & Format(((Right(DLookup("max(ID)", "学生表", "Mid([ID], 1, 4) =" & "'" & Year(Date) & "'"), 3)) + 1), "000"))

l l

2013 连接符取现有表中最大ID 如2013003 右截字符串就是003再加1，就是004，"000"是格式

点击下载此附件

Top

总记录：4篇页次：1/1 9 1 :

Access交流中心

符鸿敏老师，你好！问一个按年份编号的问题