以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 进度条  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=179587)

--  作者:建筑人生
--  发布时间:2022/8/30 21:04:00
--  [求助] 进度条
我有一段代码数据量大,我想用文字显示进度,要不然还以为死机了。  如在A段 显示计算1.。。。。,B段时显示2......等等,要如何做
--  作者:有点蓝
--  发布时间:2022/8/30 21:15:00
--  
参考:http://www.foxtable.com/webhelp/topics/1476.htm
--  作者:建筑人生
--  发布时间:2022/8/30 22:15:00
--  
以下是引用有点蓝在2022/8/30 21:15:00的发言:
参考:http://www.foxtable.com/webhelp/topics/1476.htm

这个只能增加一段,我要增加多段显示不同内容要怎么做


--  作者:有点蓝
--  发布时间:2022/8/30 22:40:00
--  
重复一段的代码不就是多段啦!

e.Form.Controls("Label1").Text = "正在处理代码1,请稍后..."
Application.DoEvents()

处理代码1
e.Form.Controls("Label1").Text = "正在处理代码2,请稍后..."
Application.DoEvents()

处理代码2
e.Form.Controls("Label1").Text = "正在处理代码3,请稍后..."
Application.DoEvents()

处理代码3
……