也可:
Idx = e.DataTable.Compute("Count(日期)","日期 = #" & e.NewValue & "#")
e.DataRow("编号") = bh & "-" & Format(idx,"000") '可能Count 效率低于Max
加好友 
发短信
Post By：2013/3/10 11:50:00 [显示全部帖子]
