主题：[求助]病案明细表的[病案号]列怎样实现自动编号？

AppendFor("病案明细表","姓名,性别,年龄,病案号,入院日期,出院日期,住院天数,家庭住址,出院诊断,转归,经治医师,病历等级,是否合保","姓名,性别,年龄,病案号,入院日期,出院日期,住院天数,家庭住址,出院诊断,转归,经治医师,病历等级,是否合保","科室"," = ",[科室])
egd文件下载密码：z125320
公式应该设在什么地方。

-=-=-=- 以下内容由 郑颖 在 2006年09月30日 00:00am 时添加 -=-=-=-
上面的公式

放在自定义按钮内

自动病例编号可以这样？
egd文件下载

-=-=-=- 以下内容由 wjq1072 在 2006年09月30日 09:02am 时添加 -=-=-=-
前面给你的是：内科、外科、妇科---分别取首字母：nk、wk、fk（无非是一表示区分的记号而已）这样公式就简单，否则你就要加三科的判断。现在我变通一下科室后分别加上A、B、C（没有用判断）

wjq1072用的编号公式，严格来说应该是不可取的，原因有2。
1、Left(Text(Today()),4)是取当天的年份，假如此文件要用几年，如果重算后编号列的数据就会出现混乱。
2、"000"+Text(CountFor(...)是在所有编号前加3个0，如果编号到100个，就会出现A2006000100，而非楼主所要求的A20060100。

CZY版主纠正得对，应该换成：Left(Text([入院日期]),4)才行，谢谢！！