新网创想网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
这是我自己写的一个进度条控件,如图:
创新互联建站专业为企业提供临淄网站建设、临淄做网站、临淄网站设计、临淄网站制作等企业网站建设、网页设计与制作、临淄企业网站模板建站服务,十多年临淄做网站经验,不只是建网站,更提供有价值的思路和整体网络服务。
边框粗细和边框颜色以及进度条颜色都可以调。
进度条大小你可以自己拉伸。
同时,进度条还提供了丰富的动画效果(如边框闪烁效果【可关闭】,进度条滑动效果等。)
将边框粗细调为0即可实现无边框(同时边框闪烁效果(见“Flash”属性)也将关闭!)
进度值(见“ProgressValue”属性)类型为Single(单精度浮点数)
将我提供的DLL文件拖到工具箱即可安装
只能用于Windows窗体应用程序!
目标平台:.Net Framework 3.5
属性说明:
1.BorderColor 用于调整边框颜色
2.BorderWidth 用于调整边框粗细
3.Flash 用于开启、关闭边框闪烁效果
4.ProgressValue 用于设置、查看进度值
5.ForeColor 用于设置进度条颜色
6.BackColor 用于设置控件背景色
附件如果丢失,请私信。
简单的办法可以试试赋值后加
控件.refresh +
System.Windows.Forms.Application.DoEvents()
或者
My.Application.DoEvents()
复杂的方法就是用后台线程循环,并更新界面
有不是多线程的,.NET有一个异步控件来完成这个事情,BackgroundWorker。
多线程其实比你想象的简单,你计划操作步骤,打比方说我们处理一个文件,用进度条来显示进度。我们可以定义解压他进度为5%,解密文件后哦进度完成20%,读取数据后进度完成30%,重新整理插入数据后进度完成60%,再加密,进度为80%,再压缩进度为90%,再发送进度为95%,删除历史记录结束动作进度为100%。这种事就要多线程去完成,调用控件你就需要委托或者回调控件。
进度条给他赋值就好了,程序运行后你会发现进度条在动。
这是现在90%程序进度条原理。
VB.Net中提供了ProgressBar控件,用于显示进度条
我建议你不要用进度条显示剩余时间而是显示执行进度
这样比较好控制
设置ProgressBar的Minimum和Maximum属性为循环的起始和终止数值
然后在代码的循环体中计算当前循环的进度,然后设置进度条的Value属性,
将进度显示在进度条上
比如,简单的例子:
Dim Progress As Integer
ProgressBar1.Minimum = Min
ProgressBar1.Maximum = Max
For i As Integer = Min To Max
'执行计算.......
Progress = i \ Max '计算进度
ProgressBar1.Value = Progress '显示进度
My.Application.DoEvents() '使用Doevents防止窗体假死使进度条看不到,但是会严重降低运行速度
Next
这里的优化技巧是,可以设置为每隔N次循环才更新进度条
If Not Progress Mod N Then ProgressBar1.Value = Progress
不然进度条的更新也许比计算的速度还要慢很多
这个不象是怎么传递Pr值的问题吧,是不是读取过程中卡啊?
在pr=J 下面加一句My.Application.DoEvents() ,暂时释放一下控制权,使程序去处理完其它事件。再说不需要时间控件,直接在循环过程中修改进度值也可以,然后来一句My.Application.DoEvents()。
VB本身有进度条控件。程序启动时加载多少控配置,组件都是编写源码时可知的。进度条的上限就是加载组件,配置数的和,加载成功一个就自加1