代码没问题，选择大区或时间都可以触发代码。如果有问题，具体例子发上来看看。
idx = CInt(max.Substring(12,4)) + 1 '获得最大单据编号的后四位顺序号,并加1
最好改成
idx = CInt(max.Substring(bh.length,4)) + 1 '获得最大单据编号的后四位顺序号,并加1
加好友 
发短信
Post By：2017/9/5 15:27:00 [显示全部帖子]
