把次数改为整数型，使用1、2、3、4这种方式记录，不要使用中文，不好处理。
然后把次数加入查询判断条件即可，大概这样
drs = e.DataTable.Select("[_SortKey] >= " & dr("_SortKey") & " And [烘焙流水号] = '" & dr("烘焙流水号") & "'", "[_SortKey]")
For i As Integer = 1 To drs.Count - 1
if drs(i)("次数") = drs(i-1)("次数") + 1
drs(i)("烘焙余量_根") = drs(i-1)("烘焙余量_根")
else
drs(i)("烘焙余量_根") = drs(i-1)("烘焙余量_根") + drs(i)("烘焙数量_根") - drs(i)("领用数量_根") + drs(i)("退回数量_根")
endif
Next
加好友 
发短信
Post By：2023/4/12 16:11:00 [显示全部帖子]
