说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

在Visual Basic中显示动态运行进度

HTML文档下载 WORD文档下载 PDF文档下载
在Visual Basic中显示动态运行进度


在安装WINDOWS应用程序时,常有状态条来动态显示安装的进度。这种动态显示程序运行进度的方法在WINDOWS许多应用程序中都有应用。这项技术在WINDOWS应用程序开发中有其重要地位。它表示一种过程的指示。WINDOWS规定:当一个操作需2~3秒时,而用户在此操作完成前无法继续操作时,应在不可访问窗口上显示沙漏光标,示意用户等待。若这一操作持续更长的时间,则应使用动态显示的时间指示器。并有完成的进度百分比,暂停、恢复和取消等按钮以及其他提示信息。用Visual Basic实现这一功能是极其简单的,其方法有二。列举如下:
1. 使用图片框Picture Box。
用一简单的循环语句控制图片框的宽度增长,即可显示动态增长过程。可再加一个文本框以显示提示信息。一个简单的示例如下:
Form1: Caption:进度显示器
Picture1: backcolor: RGB(255,0,0)
Width: 1
borderstyle: 0
text1: borderstyle: 0
Sub Form_Load ( )
Picture1.Width = 1
End Sub
Sub Form_Click ( )
For i = 1 To 1000
Text1.Text = Int(i / 10) & " " & "%"
Picture1.Width = i
Next i
End Sub
这样就可获得用百分比表示的进度指示器。
2.使用专业版VB中的三维面板3D Panel Control
首先要用VB菜单中的File—Add File…的命令将Threed.vbx文件从WINDOWS的SYSTEM目录中加到当前工具箱中来,这样你会发现工具箱中出现了一系列的三维工具。其中三维面板3D Panel Control具有动态显示进度的功能。有关此功能的属性有:
FloodColor 设置面板的颜色以区别与背景色;
FloodType 表示动态显示的方式。各参数的意义如下:
0 没有状态条进行显示;
1 面板中将用FloodColor颜色从左到右递增显示变化状态;
2 面板中将用FloodColor颜色从右到左递增显示变化状态;
3 面板中将用FloodColor颜色从上到下显示变化状态;
4 面板中将用FloodColor颜色从下到上显示变化状态;
5 面板中将用FloodColor颜色以圆形从中心向外扩展显示变化状态;
FloodShowPct 设定在状态显示中是否显示百分比的变化。设为TRUE则表示显示百分比。
FloodPercent 设置或返回百分比的数值显示,仅在程序中设置,设计中无效。
下面给出一个简单的例子,当单击按钮时,面板就动态显示百分比变化:
Form1: caption: 进度显示
Command1: caption: 安装
panel3d1: BevelInner = 1
BevelOuter = 2
BevelWidth = 2
ShadowColor = 1
FloodType = 1
FloodShowPct = True
FloodColor = RGB(0, 0, 255)
Sub Form_Load ( )
panel3d1.BevelInner = 1
panel3d1.BevelOuter = 2
panel3d1.BevelWidth = 2
panel3d1.ShadowColor = 1
End Sub
Sub Command1_Click ()
For i = 0 To 100
panel3d1.FloodType = 1
panel3d1.FloodShowPct = True
panel3d1.FloodColor = RGB(0, 0, 255)
panel3d1.FloodPercent = i
Next i
End Sub
这样就生成了一个以百分比显示进度的指示器,其三维界面标准而美观,通过用程序控制三维面板的FloodPercent属性,可以设计出更加符合WINDOWS标准的安装界面,将它应用到自己开发的WINDOWS应用程序中,一定会为自己的应用程序增色不少。



大数据时代,看“小数据”如何支持决策 22人15天研发 微信红包系统发起“珍珠港偷袭”的背后 开发产品防脱节,DevOps来帮忙 手游福音:官方中文版Unity用户手册免费发布 支持多平台!2D和3D游戏引擎Godot宣布开源 从Google备份互联网看“数据安全” NBA全明星周末,数据打造下的辉煌盛事 2014情人节没活动?我们来帮你! Windows 8授权销售已超过2亿份 速度不及Win 7 IDC:2013年第四季度Windows Phone出货量大幅增长 深入思考SDN的核心本质:从SDN=OpenFlow回到软件定义网络 谷歌、VMware在Chromebooks上双赢了,微软你怎么看? Tizen真要来了!又有15家IT大佬成帮会成员 研发周报:开源世界应该致谢的五家公司 Square、LinkedIn、Google... 看国外巨头如何“绑架”用户? 一周消息树:5.5寸屏幕的iPhone 6概念机来袭、索契冬奥会开幕式现Bug 一周热点:美国大学生数学建模分析,Hadoop不是万能,探访雅虎数据中心 Google Play services 4.2全球推送,完全支持Chromecast! 移动周报:最快的Web开发IDE——HBuilder Google Glass是空有噱头还是实用品? 服务好“最后一公里”,高效CDN架构经验 “义军”突起,帮用户夺回大数据控制权 为安全,Google收购基于超声波密码验证技术公司SlickLogin 2014 Shenzhen Maker Faire:国内顶级创客聚会即将举行 若无创新,智能手机将是死路一条 任道远上任VMware中国研发中心总经理 Windows免费,微软方能解救PC市场 Hadoop核心架构HDFS+MapReduce+Hbase+Hive内部机理详解 将会出现iCar?苹果应该收购特斯拉的七大原因 广大程序员的福音:Bing Code Search扩展助你方便查找代码 深挖线下价值是当前婚恋交友网站获取盈利的突破点 这样的方法怎么写?送500分 如何判断行尾,\r\n 关于翻译的问题 哪位知道用VB或VC实现WAV转成VOX的控件,或者是直接录音成VOX文件 请教群集服务器上数据库的连接问题 关于拷贝构造函数的问题!! 二两乾天只手擎,谁想到对得上的吗? 在一Bean中,我返回一ResultSet,那么在bean中无法关闭数据库连接了,该怎么办? 继承了TComboBox的WndProc后无法截获WM_CHAR消息为什么? ReleaseDC和DeleteDC有什么区别? TNMFTP编程下载时出现:socket send aborted请指教! 客户端用java,数据库为oracle,如oracle设置为某一字符集,此时在java中得到的字符是什么字符集? ★★★ASP页面奇慢无比,Html很正常。大家救救我吧!★★★ 哪位知道用VB或VC实现WAV转成VOX的控件或源程序,或者是直接录音成VOX文件 有个小程序,我出钱,谁想做? rs.close 与rs=nothing 有什么区别,应该怎样用比较好!! Outlook中便笺字体的设置问题 请问那里有.net的教程下载? delphi6中 Corba data object 中怎么用ado呢? 为什么总不行? 如何在pb中实现控制datawindow每页的打印条数? 哪位知道用VB或VC实现WAV转成VOX的控件或源程序,或者是直接录音成VOX文件 请教高手!恳请指点! 我有个小程序,我出钱,谁有兴趣做下? listview中如何得到当前鼠标所在位置的单元格内容 TRxtrayIcon控件,我搜索了多个地方,可一直没有在dephi上用的,那位有!! Unicode CreateCompatibleDC创建兼容的设备描述表有什么本质的用途? 好久没来了,不知说什么好! 请教:装ORACLE的分区所剩空间太小,能不能让新建的数据库文件保存在别的磁盘分区? 怎样加密文件和文件夹?很急!!! 如何实现StringGrid只有一列为编辑状态,其它列为只读? ClientDataSet执行关闭,为什么还会执行BeforeGetRecords事件呢? 如何实现将bmp图进行缩放,不要显示在屏幕上,但要存储到硬盘。急!!谢谢! 那有vs6下载? 可分割窗体 如何把TADODATASET转换成IDispatch类型 转换类型 COM的问题(新手) 如何应用ASF Reader Filter? 关于接收windows消息的问题 java程序移植到linux下中文字体变成??||之类的,怎么解决 怎么近来CSDN上的N多历史帖子都看不了了 ? 如何获取汉字的拼音码? 有没有记录DBGrid的当前位置的,我说的不是用bookmark,因为我的DataSet是动态建立的,在刷新时好象Bookmark用不了。 英文cuteftp为何中文显示为乱码? 汉化cuteftp却显示英文为乱码? 这个问题真头疼! 在XML中,如何显示一个图像 编程菜鸟急急急——关于autocad的一个插件!! winxp家庭版中是否有IIS,有的话在哪里安装,我在添加windows组件中怎么找不到?在线! js中有没有类似php中的basename 和 explode 方法 hook 问题? help,我一哥们光荣下岗,有做java项目又缺pm的请帮忙 关于高一物理斜面上受力分析 关于摩擦力1.物体在粗糙斜面上受拉力静止 有摩擦力么2.物体在粗糙斜面上受拉力静止后去掉拉力 物体仍静止 有摩擦力么 3.物体在粗糙斜面上受拉力静止后去 一批产品经检验,合格的有792个,不合格的数量占合格的99分之1,这批产品的合格率是( )% 一道关于动量的物理题甲车质量2kg,静止在光滑水平面上,上表面光滑,右端放一个质量1kg的小物体,乙车质量4kg,以5m/s的速度向左运动,与甲车相碰后甲获得8m/s的速度,物体滑到乙车上,若乙车足够 建议书作文.关于建图书馆的,.好的加100分给学校的建议书,为了提高孩子们的课余时间,请建一个图书角。请写一份建议书 一批产品,经检验合格的有99件,不合格的占合格的1/99.这批产品的合格率是多少? 一道关于物理动量的题光滑的水平面上有质量为M的滑块,其中AB部分为光滑的1/4圆周,半径为r,BC水平但不光滑,长为L.一可视为质点的质量为m的物块,从A点由静止释放,最后滑到C点静止,求物块与B 五年级上册语文书的作文分别是什么?急~~~跪求!~ 一批产品,经检验合格的有198件,不合格的占合格的1/99.这批产品的合格率是多少?要算式 一道物理题(有关动量)质量为m的物体,初速极小,在外力作用下从原点起沿x轴正向运动.所受外力方向沿x轴正向,大小为F=kx.物体从原点运动到坐标为x0的点的过程中所受外力冲量的大小为_ 跪求:写去图书馆的英语文章 PS:小学五年级的水平. 一类产品,经检验合格的有190件,不合格的占合格的1/99,这批产品的合格率 写一篇有关京剧的小论文内容有关 看大王在帐中和衣睡稳(霸王别姬选段)海岛冰轮初转腾(贵妃醉酒)雄心壮志冲云天(红灯记)家住安源(杜鹃山)写下这些京剧的内容,再写这些京剧 五年级语文书习作一的作文素材怎么写 黑板尺寸有哪些?标准尺寸多少合适? 有关京剧的作文 请问有什么京剧 黑板的尺寸大概是多少? 韩麦尔先生使出全身的力量,在黑板上写下了“法兰西万岁”表现了他怎样的思想感情? 把50g糖溶解在1kg水中.糖和糖水质量的比是 填适合的单位,黑板的大小约有250【】 动量与能量的综合问题A球动量5kg.m/s,B的是7,当A球追上B球时,发生对心碰撞,则碰后动能可能为?A.PA=6kg.m/s,PB=6kg.m/s,B.3,9C.-2,14D.-5,17不好意思,打错了,则碰后动量可能为? 梅兰芳毁画阅读:梅兰芳是一个怎样的人? 物理动量与能量在光滑水平面上停放一辆小车,小车上固定一个半球壳,小车左面是墙壁,小球从半球壳左端与半径等高处由静止释放,小球与球壳之间光滑无摩擦.(1)如果没有墙壁,小球与球壳 动量与能量问题如图所示,质量为M=1Kg,长为L=2.25m的小车B静止在光滑水平面上,小车B的右端距离墙壁S0=1m,小物体A与B之间的滑动摩擦系数为μ=0.2.今使质量m=3Kg的小物体A(可视为质点)小物体以 著名京剧表演艺术家为什么不演戏而光画画,又为何将自己的心血毁掉? 填适合的单位,黑板的大小约有250什么 动量与能量的问题有着样一道题:有一质量为m子弹以v的速度水平射出.穿过放在光滑的水平桌面上的质量为M的木块后.子弹速度变为v/2求在此过程子弹损失的机械能?着怎么解答`?损失的机械能 抽样检验一种商品有, 48件合格,2件不合格,合格率是()%抽样检验一种商品有,48件合格,2件不合格,合格率是()% 梅兰芳学艺阅读题答案 1.梅兰芳是在什么情况下学艺?作者重点写了什么事?从中我们了解到梅兰芳是个怎样的2.根据文章,在括号里填词语,写出它们在表达中心思想上的作用.〔 〕的眼光 〔 〕 求一篇题目《我与京剧》的作文 字数400——600(要原创!) 抽样检验一种商品,有48件合格,2件不合格,这种商品的合格率是(),照这样计算,要保证有1000件合格产品 梅兰芳毁画阅读答案 京剧作文? 抽样检验一种商品,有38件合格,2件不合格,这种商品的合格率是多少 把句子写具体:京剧艺术家梅兰芳是个勤学苦练的人,_______________ __________________________________ 关于 京剧 的作文及介绍因为从来没看过, 家用饮水机的加热管电阻值应是多少?能根据饮水机的额定电压、功率来计算得出吗? 1.使运动的物体在恒力作用下停止,所用时间的长短取决于()A 惯性 B 初动量 C D 我选了CD,为什么?2.一质量为M的物体在光滑的水平桌面上做匀速圆周运动,其转动周期为T,速度为VO,其物体在T/4 如图所示,质量均为m的两块完全相同的木块A、B,放在一段粗糙程度相同的水平地面上,木块A、B间夹有一小块炸药(炸药的质量可以忽略不计).让A、B以初速度v0一起从O点滑出,滑行一段距离后 加湿器,台灯,手电筒,饮水机,电冰箱的电功率,电压,电流,电阻说明书都没啦 急 十万火急只要现在家里用的就好啦 越细越好(我不会欧姆定律) 有一质量为6.64*10^-27kg,速度为v的α粒子与一个质量为3.32*10^-26kg,静止的氖核发生正碰,若碰撞是弹性的,试证明碰撞后氖核具有的速率约为1/3v小弟刚学动量,有很多地方不太清楚,求指教. 绳子模型在光滑水平面上,有两个玩具小车A和B,它们的质量分别为mA=3Kg,mB=6Kg,它们之间有一根轻绳连接,开始时绳子完全松弛,两车紧靠在一起,如图所示,用3牛顿的水平恒力F拉车B,使B先动起来,绳 抽样检查一批商品,有120件合格,30件不合格,这批产品的抽合格率为( )% 一个劲度系数为4.4N/m的弹簧被压缩在两个木块之间8cm,左边木块0.25kg,右边木块0.52kg.他们处在一个水平面上.木块与水平面的摩擦系数有三种情况:0,0.1,.465.问同时放手,向右为正?后来的摩擦系 普通教室里的黑板的面积约是?A.4米^2 B.40分米^2 C.4000厘米^2 D.40米 ^2 抽样检验一种商品,有46件合格,4件不合格,这批产品的合格率是(), 教室黑板距离第一排座位有多远? 高中物理-------动量与能量守恒如下图所示是固定在水平地面上的光滑长直导轨槽,槽口向上(图为俯视图).槽内放置一个木质滑块,滑块的左半部是半径为R的半圆柱形光滑凹槽,木质滑块的宽 抽样检查商品,有120件合格,30件不合格,这批产品的抽样合格率为百分之几?一件商品打八二折,就是现价是同学们做了20朵黄花,25朵红花,做的黄花比红花少百分之几?做的红花比黄花多被分之几? 一个简单的高中物理题一带电油滴在相互垂直的匀强电场和匀强磁场中做匀速圆周运动 其半径为R 已知场强为E方向竖直向下 磁感应强度为B方向垂直纸面向里 不记空气阻力 重力加速度为g 教室黑板长约多少厘米? 图书馆有问文艺书72本,故事书比文艺术的三倍多9本.故事书有几本?用方程 教室门的尺寸一般是多大 关于动量质量为1kg的小钢球B静止在光滑水平面上,质量为2kg的钢球A以1m/s的速度与B发生正碰,求碰后A、B两球的总动能的取值范围.我知道最大值是1J,可是最小值怎么算? 图书馆有问文艺书72本,故事书比文艺术的三倍多9本.故事书有几本?用乘法 根据有关部门公布的中小学生近视防控行动计划要求,标准教室最前一张课桌前缘与黑板的水平距离应不小于2米,最后一张课桌后缘与黑板的水平距离不超过8.5米.某班所有的课桌宽度为46.25厘 一道物理动量题两质量均为M的冰船A,B静止在光滑冰面上,轴线在一条直线上,船头相对,质量为m的人从A船跳入B船又立刻跳回.A,B两船最后的速度之比是? 高一物理有关摩擦力的题帮忙分析一下 一种产品经检验合格92件,不合格8件,该产品的合格率是【 】%填空题 一道有关动量的物理题在光滑的水平支撑面上,有A,B两个小球,A球的动量是10千克米每秒,B球的动量是12千克米每秒,A球追上B球并相碰,A的动量变为8千克米每秒,方向没变,则A,B两球的质量的比值
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘