问题可能出在这里：
idx = CInt(max.Substring(12,3)) + 1 '获得最大单据编号的后四位顺序号,并加1
好好看看：
http://www.foxtable.com/help/topics/2403.htm
加好友 
发短信
Post By：2012/6/15 18:03:00 [显示全部帖子]
