下面这个代码为什么编号到10就不自动在加1了呢?(只能从1到10 ,不能继续11,12 。。。)
Dim max As Longmax = Tables("排产主表.排产明细表").Compute("max(序号)")e.DataRow("序号") = max + 1