以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  测试  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=189537)

--  作者：1234567 --  发布时间：2023/12/7 10:35:00 --  测试 有1万行数据，每For Each 100行数据就输入msgbox()，求代码。

--  作者：有点蓝 --  发布时间：2023/12/7 10:37:00 --   Dim Sum As Integer Dim i As Integer For i = 1 to 10000 if i mod 100 = 0 then msgbox(i) end if     Sum = Sum + i Next Output.Show(Sum)