在程序设计中,经常遇到这种情况:计算机在处理大量数据时,用户等待处理结果,而此时的用户界面往往显得单调乏味。如果有一个能动态显示操作过程的进度条就好了,它既使用户界面具有动感,又增加了程序的趣味性。笔者用VB5.0编制应用系统时,分别用VB5.0的进度条控件和滑动片控件,以及API函数BitBlt()三种方法实现操作过程动态显示。实现效果如图所示。现用两个应用实例说明如下。
★应用实例一:用VB5.0的进度条控件和滑动片控件分别实现操作过程动态显示。
(1)插入进度条控件和滑动片控件的方法:在VB5.0主菜单的“工程"项中,选择“部件(0)",在弹出的控件栏中,双击“MicrosoftWindowsCommonControl5.0"项,按“确定"键返回。那么在窗体工具箱中就有了上述控件。
(2)建立含有如下控件的窗体:
控件NAMECAPTIONINTERVALMAXFONTFORECOLOR
窗体FORM1用VB5.0实现操作过程动态显示
进度条PROGRESSBAR1100
滑动片SLIDER1100
计时器TIMER150
标签LABEL1宋体(小四)&H00FF0000&(蓝色)
...[ 查看全文 ]