Foxtable(狐表)用户栏目专家坐堂 → [求助]进度条


  共有22838人关注过本帖树形打印复制链接

主题:[求助]进度条

帅哥哟,离线,有人找我吗?
易服
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:787 积分:6349 威望:0 精华:0 注册:2008/9/1 8:26:00
[求助]进度条  发帖心情 Post By:2008/11/25 11:03:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:进度.jpg
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:退耕还林管理系统.rar

想作一进度条显示筛选汇总的进度,按钮“汇总进度”要执行“筛选汇总”的代码。

 回到顶部
帅哥哟,离线,有人找我吗?
smileboy
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 好心情 一级勋章
等级:超级版主 帖子:715 积分:5564 威望:0 精华:1 注册:2008/8/31 20:45:00
  发帖心情 Post By:2008/11/25 13:13:00 [只看该作者]

Dim p As WinForm.ProgressBar
p = e.Form.Controls(
"ProgressBar1")
p.Maximum =
MainTable.Rows.Count '设置最大值
p.Minimum =
0 '设置最小值
p.Value =
0 '设置当前值
For
i As integer = 0 To MainTable.Rows.Count - 1
    i
= i+1
   
If i Mod 100 = 0
        p.Value = i
'当前值为已经完成的行数
   
End
If
Next

 回到顶部
帅哥哟,离线,有人找我吗?
易服
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:787 积分:6349 威望:0 精华:0 注册:2008/9/1 8:26:00
  发帖心情 Post By:2008/11/25 16:00:00 [只看该作者]

这是例子,难道就这么简单与程序没什么关系,不会吧!

 回到顶部
帅哥,在线噢!
狐狸爸爸
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2008/11/25 16:19:00 [只看该作者]

这个用不了进度条的,因为耗时的就是一行代码:

t.Subtotal()

你没有办法知道进度,如果写进度条代码?

通常自己编写代码,逐行处理记录的时候没,才可以用进度条,因为自己可以知道运行的进度。


 回到顶部
帅哥,在线噢!
狐狸爸爸
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2008/11/25 16:22:00 [只看该作者]

除非我在subtotal中加入代码,在状态拦显示一个进度条。
否则你是没有办法给汇总模式的生成加上进度条的。
我考虑改一下,给subtotal加上一个参数,是否在状态拦显示进度条。

 回到顶部
帅哥哟,离线,有人找我吗?
易服
  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:787 积分:6349 威望:0 精华:0 注册:2008/9/1 8:26:00
  发帖心情 Post By:2008/11/25 16:32:00 [只看该作者]

不选任何条件时筛选汇总较慢,象死机一样,所以加个进度条表示正在运行,看起来舒服些,没有它完全可以。


 回到顶部
帅哥,在线噢!
狐狸爸爸
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2008/11/25 16:33:00 [只看该作者]

我明白,所以考虑在subtotal加上进度条显示功能。


 回到顶部
帅哥哟,离线,有人找我吗?
smileboy
  8楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 好心情 一级勋章
等级:超级版主 帖子:715 积分:5564 威望:0 精华:1 注册:2008/8/31 20:45:00
  发帖心情 Post By:2008/11/25 16:38:00 [只看该作者]

用个烂办法
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:退耕还林管理系统.rar


 回到顶部
帅哥哟,离线,有人找我吗?
易服
  9楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:787 积分:6349 威望:0 精华:0 注册:2008/9/1 8:26:00
  发帖心情 Post By:2008/11/25 16:56:00 [只看该作者]

是个好办法,代码也看得懂!

 回到顶部