[分享]将进度条个性化进行到底

fan0217

此篇来自于网络，觉得非常好，与大家分享，参照网络上的提示在Access中做了个例子。使用前请注册ccrpProgressBar控件。

很多进度条只是单纯的显示，不能同处理进度连系在一起，ccrpProgressBar可以通过ADO或DAO处理数据时动态的给ccrpProgressBar赋值，达到显示进度的效果。

控件及帮助P>


ccrpProgressBar是一个进度条的控件，可以有多种形态供选择。比起VB 中自带的进度条控件ProgressBar更有个性。

ccrpProgressBar控件的主要属性

　　·Max:最大值。默认100。
　　·Min:最小值。默认0。
　　·Value:进度条的当前值。
　　·Alignment：显示表示进度的文字的位置。分别为vbCenter（中间），vbLeftJustify（左边），vbRightJustify（右边）。
　　·Appearance：进度条的3种外观。分别为prgFlat（平面），prg3D（立体） prg3Draised（立体凸起）。
　　·BackColor：进度条的背景色。
　　·FillColor：进度条的颜色。
　　·ForeColor：表示进度文字的字体颜色。
　　·Picture：进度条可用图片表示进度，从这里选择需要的图片。
　　·Shape：进度条的形状。有prgRectangle(默认)，prgEllipse和prgRoundedRect三种。
　　·Smooth： 是否平滑显示进度。True为平滑显示进度。
　　·Vertical：是否垂直显示进度条。True为垂直显示。
　　·Style：进度条的风格。当选ChkGraphical时为用图片表示进度。
　　·AutoCaption：表示进度的"文字提示"所采用的表现形式。CcrpPercentage为百分比的形式，ccrpValueOfMax为类似 1 of 100 的表现形式。Value为数字的表现形式。

游客，如果您要查看本帖隐藏内容请回复

[此贴子已经被作者于2006-2-12 23:13:46编辑过]

skylark

To Fan0217:

这么好的文章一定要顶起来,非常感谢版主分享!

_______________________________________

Do Our Job Well  Try Anything Once

宿命的风

我在这怎么就无法运行？

kevinch

谢谢楼主！收藏先

kevinch

“很多进度条只是单纯的显示，不能同处理进度连系在一起，ccrpProgressBar可以通过ADO或DAO处理数据时动态的给ccrpProgressBar赋值，达到显示进度的效果。”

我看不出这个例子有以上你所说的功能喔，请指教——楼主。例：如何通过进度条真正反映出打开某数据库出需要的时间，而不是把“Max”首先设定在某个值。

open

发了发了发了发了发了

open

谢谢楼主！收藏先

强子

非常感谢版主分享!

a19831029a

fdsfdsfdsfdsfs

小宜

学习中......，谢谢了。