以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 数据动态显示 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=191828) |
|
-- 作者:yifan3429 -- 发布时间:2024/5/10 13:12:00 -- 数据动态显示 For Each dr As DataRow In DataTables("产品_固装家具").DataRows StatusBar.Message1 = "正在刷新数据......" & CurrentTable.Rows.Count & " 当前行: " & CurrentTable.Position + 1" Application.DoEvents() Next 黄色部分希望是动态显示 怎么做。
[此贴子已经被作者于2024/5/10 13:23:36编辑过]
|
|
-- 作者:有点蓝 -- 发布时间:2024/5/10 13:43:00 --
|
|
-- 作者:yifan3429 -- 发布时间:2024/5/10 15:09:00 -- For Each dr As Row In Tables("产品_固装家具").Rows StatusBar.Message1 = "正在刷新" StatusBar.ProgressBar.Visible = True StatusBar.ProgressBar.Value = dr.index + 1 / CurrentTable.Rows.Count & "%" StatusBar.Message2 = dr.index + 1 / CurrentTable.Rows.Count & "%" Application.DoEvents() 达不到帮助效果 老师帮我看看
[此贴子已经被作者于2024/5/10 15:08:54编辑过]
|
|
-- 作者:有点蓝 -- 发布时间:2024/5/10 15:29:00 -- StatusBar.ProgressBar.Value = cint((dr.index + 1) / CurrentTable.Rows.Count) |