- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何分数？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=196196)
-- 发布时间：2025/4/7 16:46:00
-- 如何分数？
此主题相关图片如下：分数.jpg
-- 发布时间：2025/4/7 17:09:00
--
进表按日期排序，从第一行开始遍历累加出库数量，直到大于等于数量。把这些行的单号合并起来即可
-- 发布时间：2025/4/7 17:26:00
--
还是没太明白，具体代码如何实现？
-- 发布时间：2025/4/7 20:23:00
--
tables("进表").sort = "日期"
dim 和 as integer
dim 总量 as integer = 1500
dim s as string
for each r as row in tables("进表").rows
和=和+r("出库数量")
s = s & r("单号")
if 和 >=总量 then
exit for
end if
next
msgbox(s)