以文本方式查看主题

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

--  作者:wangjh8888
--  发布时间:2017/5/9 13:01:00
--  进度条
进度条  显示不出来  如何处理下
例子:
dim totalcount as integer = 1000
for i as integer = 1 to 1000
    StatusBar.Message1= "正在。。。"
    StatusBar.ProgressBar.Visible =True
    StatusBar.ProgressBar.Value =CInt( i / totalcount *100)
    StatusBar.Message2= cstr(CInt( i / totalcount *100)) & "%"
 next

--  作者:wyz20130512
--  发布时间:2017/5/9 13:19:00
--  
Dim totalcount As Integer = 1000
For i As Integer = 1 To 1000
    StatusBar.Message1= "正在..."
    StatusBar.ProgressBar.Visible =True
    StatusBar.ProgressBar.Value =CInt( i / totalcount *100)
    StatusBar.Message2= cstr(CInt( i / totalcount *100)) & "%"
    StatusBar.Refresh
Next

--  作者:有点色
--  发布时间:2017/5/9 14:18:00
--  

测试

 

Dim totalcount As Integer = 1000
For i As Integer = 1 To 1000
    StatusBar.Message1= "正在..."
    StatusBar.ProgressBar.Visible =True
    \'system.threading.thread.sleep(5)
    StatusBar.ProgressBar.Value =CInt( i / totalcount *100)
    StatusBar.Message2= cstr(CInt( i / totalcount *100)) & "%"
    StatusBar.Refresh
Next


--  作者:wangjh8888
--  发布时间:2017/5/9 14:29:00
--  
谢谢
--  作者:cd_tdh
--  发布时间:2017/5/10 16:08:00
--  
以下是引用有点色在2017/5/9 14:18:00的发言:

测试

 

Dim totalcount As Integer = 1000
For i As Integer = 1 To 1000
    StatusBar.Message1= "正在..."
    StatusBar.ProgressBar.Visible =True
    StatusBar.ProgressBar.Value =CInt( i / totalcount *100)
    StatusBar.Message2= cstr(CInt( i / totalcount *100)) & "%"
    StatusBar.Refresh
Next

大师,怎么去获取当前的保存进度,让进度条根据保存进度在状态栏显示。


--  作者:有点蓝
--  发布时间:2017/5/10 16:48:00
--  
DataTable.save方法无法获取进度。除非你是自己逐行保存的
--  作者:有点蓝
--  发布时间:2017/5/10 16:49:00
--  
你可以开启计划任务,一秒前进一格,然后不断重头再来。直到保存完毕
--  作者:cd_tdh
--  发布时间:2017/5/10 22:45:00
--  
意思是在保存的时候启动任务计划?保存结束时结束任务计划?这样我一秒保存完,进度条不是走到一格就结束了啊?
--  作者:有点色
--  发布时间:2017/5/11 0:53:00
--  

 你可以在beforeSaveDataRow事件写进度条累加1的代码。

 

 保存的时候,一条一条保存吧,这样效果才有。