以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  数据动态显示  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=191828)

--  作者：有点蓝 --  发布时间：2024/5/10 13:43:00 --   For Each r As Row In Tables("产品_固装家具").Rows             StatusBar.Message1 = "正在刷新数据......" & CurrentTable.Rows.Count & " 当前行: " & r.index + 1"             Application.DoEvents()             Next

--  作者：有点蓝 --  发布时间：2024/5/10 15:29:00 --   StatusBar.ProgressBar.Value = cint((dr.index + 1) / CurrentTable.Rows.Count)