idx = CInt(max.Substring(12,3)) + 1 '获得最大单据编号的后四位顺序号,并加1
改成
idx = CInt(max.Substring(bh.length,3)) + 1 '获得最大单据编号的后四位顺序号,并加1
加好友 
发短信
Post By：2019/1/15 11:18:00 [只看该作者]
