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

VB如何使用资源文件

HTML文档下载 WORD文档下载 PDF文档下载
VB如何使用资源文件

VB编程的好帮手--资源文件

  各位VB高手,你一定也常常因苦于无法组织自己程序中大量的picture,而头痛不已,那就让小生为各位介绍一下VB编程的好帮手--资源文件。
  所谓资源文件,就是指将在程序运行时用到的资源集中在一起的一个文件。一个资源文件可以包括文字(TEXT)、位图(BITMAP)。图标(ICON)等。并且在程序中调用时不用指明路径,这就简化了程序的编写并减少了发生错误的可能。现在我就以一个小程序为例讲述资源文件的一些使用方法。
  这个工程运行后,当点击【未来】按钮时中间图像将依次变换为夏、秋、冬、春……点击【从前】按钮则以相反顺序转动图片(源程序附后)。
  首先建立春、夏、秋、冬四幅位图,均以.BMP格式保存在C:\TEST\下。然后打开记事本编写资源文件,
  内容如下:
  100 bitmap spring.bmp
  200 bitmap summer.bmp
  300 bitmap autumn.bmp
  400 bitmap winter.bmp

  其中数字表示此项的ID号码,此号码很重要,它直接影响调用!BITMAP表示以位图方式保存而最后的部分为文件名。将此文件保存为TEST.RC。
  接下来编译此资源文件。在C:\Visual Basic\Wizards目录下找到RC.EXE文件。在MS-DOS方式下键人C:\rc /r c:\test.test.rc(键入rc /?将会得到帮助),在编译成功后在C:\TEST\中将发现增加了一个名为TEST.RES的文件。
  完成了上面的工作,接下来就可以编写工程了。首先建立一个image控件img和两个Command控件cmdc、cmdw。然后建立一个时钟控件,设其Interval属性为1000。最后在[通用]中声明一个名为iid的整形变量:

  Dim iid As Integer

  并初始化img和iid:
  img.Picture=LoadResPicture(100,vbResBitmap)
  iid=100

  其中LoadResPicture(id,model)为从资源文件中调用图像的函数,100表示ID号为100的项,bResBitmap为一常量,值为0,表示以位图方式打开。然后在两个Command控件中加入源程序代码。
  最后在工程资源管理器中用鼠标右键单击选择【添加】-->【添加文件】,加入TEST.RES。
  至此工程可谓大功告成,按F5运行一下,希望你会喜欢。还有一点要强调的是一个工程只能有一个工程文件!附源程序:

Option Explicit
Dim iid As Integer

Private Sub comc_Click()
 iid = iid - 100
 If iid < 100 Then iid = 400
  img.Picture = LoadRespicture(iid.vbResBitmap)
 End If
End Sub

Private Sub comw_Click()
 iid = 100 + iid
 If iid > 400 Then iid = 100
  img.Picture = LoadResPicture(iid,vbResBitmap)
 End If
End Sub

Private Sub Form_Load()
 img.Picture = LoadResPicture(10O,vbResBitmap)
 iid = 100
End Sub

Private Sub Timer1_Timer()
 iid = 100 + iid
 If iid > 400 Then iid = 100
  img.Picture = LoadResPicture(iid,vbResBitmap)
 End If
End Sub
【专访】敏捷专家吴穹:敏捷测试的行业应用与实战解析 英特尔中国研究院最新成果亮相 展示智能衣服瓷杯机器人等创新作品 Node.js 打造实时多人游戏框架 深圳微信开发者大会购票企业特征分析 上门汽车服务“e保养”完成A轮500万美元融资 Docker之父Solomon Hykes谈项目开发的初衷和挑战 浪潮是如何实现单日5000台x86服务器交付互联网的? Bootstrap 3.3.0发布 版本4不再支持IE8 漏洞预警:FTP曝严重远程执行漏洞 影响多个版本Unix 【简讯】W3C小组宣布HTML5标准制定完成 AMD发布GPUPerfAPI 2.14,GPU性能检测更Easy! 开放能力升级——微信公众号登陆授权开启公测! 百度最“智能”的新型推荐技术——智能因子分解机 消灭Bug!18款最佳的问题跟踪管理应用程序 Google Analytics为什么会这么快 【MDCC 2014】Xamarin深入体验营——开发实战大揭秘 【MDCC 2014】电信技术专场:运营商与开发者如何合作共赢 【MDCC 2014】高德LBS大赛闭幕式暨颁奖典礼:下一个50亿应用花落谁家? MDCC 2014移动开发者大会开幕:全生态系统齐聚 开发者成主角 蓝港互动有限公司董事长&amp;amp;首席执行官王峰:移动互联网泛娱乐化趋势 多盟联合创始人&amp;amp;总裁张鹤:多盟DSPAN助力开发者高效变现 创新工场联合创始人汪华:移动互联网时代的跃迁式增长 阿里巴巴集团UC移动事业群总裁俞永福:AMAP Inside——更专业、更开放 《程序员+》移动应用上线 启动“2014 MDCC十大人气应用/产品评选活动” 微软开发体验与平台合作事业部大中华区DX部门总经理Srikanth Raju:基于云的跨平台开发 Facebook平台工程合作部亚太区总经理张博:通过Facebook构建下一代移动应用 Vungle工程副总裁Wayne Chan:移动视频广告的未来 友盟副总裁焦岳:2014移动互联网行业趋势&amp;amp;大数据的行业价值与运营支持 联发科技创意实验室副总裁Marc Naddell:以小博大的可穿戴方案 用友软件股份有限公司高级副总裁谢志华:企业互联网移动化触手可及 【MDCC 2014】英雄会晚宴——厉兵秣马,再上征程 请问一个关于GB要转换成日文的Shift-JIS内码的问题 请问一下这个字符串什么意思? 在ASP.NET中怎樣讀取通過用XMLHTTP Send過來的XML數據包(一個問題50) 关于IrDA在WINDOWS/NT/XP下的编程实现 一定给分啊,快点进来看看阿 ! 帮忙写个SQL语句。 静态文本框里的文字如何调整其大小? store procedure类型 数据窗口问题 编译器参数,在线等待 求sql 如何用BUTTON按钮,将一个窗体文件关闭? 非常简单的付值问题.火急,再线等待,马上送份 调用RasDia();第一次拨号成功断线后再拨就返回错误字符终止连接为何代码如下: 怎样能编写用于用ie注册邮箱、论坛账号时自动填表的软件 资源文件的问题! 一个挑战斑竹的问题!!50分 如何把压缩文件(*.rar或则*.zip)和word文档存到Acess数据库啊??? 如何可以知道访问我的网站的用户来自哪里? 关于SQL的问题 这对话框我如何去掉 asp.net 能否运行在Solaris系统下,参与者有分 c#请求援助 int a 除以 int b 取他们的余数用C#该怎么写啊?谢谢 求救!显示后台数据,在线等待!等…… jsp中的数据库问题,求教!!急 刚学数据库,弱智问题,高分赠送! 这个查询怎么写? 关于表生成文本文件遇到的事情,急 InstallShield Professional Standard Edition 6.30 英文版的下载(高分:200) 寻一男友:发展方向——>老公 我用serv-u,客户端访问为什么没有用户登陆窗口啊? 脚本验证datetime要准确点的 请问,想做出象Protel(Tango)作图效果的程序,如何下手呢? win API函数的区别(win xp 和win 2000)高难度!! 那儿有winsock.pbl 进入系统的速度变慢????在线等待 当 AllowPaging 设置为真并且选定的数据源不实现 ICollection 时,AllowCustomPaging 必须为真,并且 ID 为 DataGrid1 的 Data 怎么提高搜索速度? 如何printScreen并获得这个图片? 如何用SQL格式化一个IP地址?我得到的IP地址是一串数字,想显示为255.255.255.255那样的样子。 为什么在客户端出现Interface not support的错误? help,关于文本显示! SOS 急急急 请教几个概念? 如何打开一个用winexec打不开的可执行文件。 进入系统的速度变慢????在线等待 请大家谈谈目前比较经典软件,共享的,免费的,大公司的,个人的,国内的,国外的,不分行业等等,只要是经典都可以,请大家畅谈! 欢迎踊跃讨论!如何使得delphi编的exe或dll最小! 基于对话框的打印,打印一块区域!! 一个简单的链问题是输入一个结点请高手在助我 急问!在access中什么字段类型能容纳很多文本?就类似sqlserver中的text!!! 23.增值税一般纳税人销售货物适用13%税率的有(ACD)A.销售材料  B.销售钢材  C.销售图书  D.销售自来水 理由 每天看书的5分子1还多10页,4.5天看完这本书,问这本书一共多少页?怎么答题 一项工程甲单独干需10天,乙独干需8天,现在甲先做2天,剩下的两队合作还需几天? 甲乙合作一工程要6天,如果甲先做3天,再由乙继续做8天刚好完成.若甲独做这一工程,要多少天呜呜呜,烦死了,端午节也在写作业,好多应用题不会, 一本小说,每天看45页,第16天看完;如果每天看54页,第14天就看完了,这本小说最多几页,最少呢? 一项工程,如果单独做,甲队需8天,乙队需10天,两队合干了一段时间后,还剩下这项工程的三分之二没有完成.甲、乙两队合干了几天 一项工程,甲独做6天完成,乙独做8天完成.两人合做3天,完成这项工程的 双向自动扶梯一层到二层,两个扶梯梯级宽度都是800,三十度倾斜角度,提升高度为4200那么土建时,二层预留洞口宽度为多少,二层顶端是否要留得大点,一层基坑的大小是多少? 一项工程,甲独做6天完成,乙独做8天完成,两人合做( )天完成,所以尽量将清楚 一本小说,如果每天看45页,第十六天看完;如果每天看54页第14天看完.这本小说最多有几页?最少呢? 巍巍中山陵第9段描写了哪里的景色 一项工程,甲单独做6天完成,乙单做8天完成,两人合做多少天完成? 我读1本书第1天读了10页以后每天都比前一天多读2页第16天读28页正好读完 这本书共多少? 哪位能将《巍巍中山陵》书后习题答案告诉偶,万谢 一项工程,甲乙合做8天完成.如果先让甲独做6天,再由乙独做,完成任务时发现乙比甲多了3天,乙独做这项工程要几天完成? 有关 崇尚科学,反对邪教 的征文800到1000字.麻烦写得水平高一些吧. 巍巍中山陵 写祭堂用了什么说明顺序 急具体的空间顺序,比如说由内到外什么的,是写祭堂,不是整体写中山陵,要具体的空间顺序,急 找一篇题目为等待的作文,字数600左右,要中学生水平. 一项工程甲队独做8天完成,乙队独做10天完成,甲乙合干三天,乙队另有任务,甲队还要干几天才能干完这工程高手来解 当.时,.而当...时,.造句(《巍巍中山陵》第八段 仿写) 以"春节,我最快乐的一件事"为题,写一篇作文,字数500字左右, 小东图书本数的5分之3等于小强图书的3分之2,小东与小强图书质量比是多少 去澳门考托福需要准备什么!本周六就要去澳门考托福了!由于是第一次 自己去 所以也不知道该准备什么!请问要带什么不要带什么呢!除了身份证护照之外有什么证明的呢?就是需不需要用张纸 我是个高中生,我写作文总是没话说,所以常因字数不够被扣分,怎样才能改善呢,还有怎样写好作文 小刚和小强看同一本书,小刚还有19页没看,小强还有14页没有看,他们俩()看的页数多. 一个底面直径是20厘米的圆柱形容器里面装有一些水,把一块铁块完全浸没在水中,水面上升了3厘米,这块铁块的体积是多少? 我作文总是写不够字数怎么办?怎么才能有话说,凑够字数?基础差我看到作文就觉得没话说.怎么才能把文章写细腻,写够字数?800字 中山陵怎么走? 帮忙写个作文开头和结尾,题目《目光,助我前行》作文的要求是“题目中含有‘目光’一词”.我想写体育课时各种目光:同学们取笑我体育不及格的目光、老师失望的目光、还有朋友鼓励的 已知圆锥的底面半径是3,母线长为6,则该圆锥侧面展开后所得扇形的圆心角为需要讲解下.. 中山陵怎么去 找地震中的师生情班会主持词?快 帮我点评一下这篇托福作文,看看能多少分求 各种拍砖People work because they need money to live.What are some other reasons that people work?Discuss one or more of these reasons.Use specific examples and details to support your ans 中山陵的地理位置【要简短】 专家帮忙给我托福作文评分你认为人们都是为了什么上大学的,就是ibt的第一个独立作文题目.my version:Basically,university and college is a place for learning,trying and enjoying .With the extension of enrollment of s 励志名言名句,附带一篇演讲稿 用什么去刺激蟋蟀须,让它们打架 写了一篇托福作文,希望能得到一些意见和建议,文章主要都是自己发挥,不太想用模板,觉得这样会有些枯燥,而且对长期的写作帮助不大.所以写得比较随意,可能问题会比较多,虚心赐教,People tod 小红看一本书,第一天看了全书的14%,第二天看了12页,还剩27页没看.这本书一共多少页? 蟋蟀吃什么?怎么看雌雄?现在养最多活几天? 关于四川地震的中队主题队会结尾串词怎么写我现在初1,不用太长,也不要太短, 小红看一本书,第一天看了全书的10%,第二天看了全书的15%.第二天比第一天多看12页,还剩多少页没有看 巍巍中山陵课文问题吕彦设计为什么能脱颖而出?为什么要介绍大平台与入口石坊垂直高度差? 清明节主题班会主持词要求清明节主题班会的主持词! 蟋蟀怎么才能打架 中山陵简介(200字以内)不要提到孙中山 在一个底面半径是6分米盛满水的圆柱形容器中浸没一个底面半径是3分米的圆锥形铁锥,当铁锥被取出后,容器中的水面下降了2分米,求铁锥的高?急 一件工作,甲单独做X天可以完成,若甲、乙一起做,Y天可以完成,那么乙单独做几天可以完成 蟋蟀会因为吃的而打架吗 中山陵简介 100字 一项工程甲乙合干12天完成,乙丙合干15天完成,甲丙合干20天完成,如果甲乙丙三人合干几天完成? 有一本书,原计划每天看20页,如果每天多看5页就提前2天看完,问这本书有多少页?请不用方程式解题,并讲出过程, 看风识天气的谚语 《青鸟》读后感50字0000000000000000000000000000000000000000000000000000青鸟》讲述的是:圣诞节前夜,伐木工简陋的小屋里,男孩蒂蒂和女孩咪蒂正在眺望富人家的孩子过节.仙女装扮成老太太请他们为她 蟋蟀为什么爱打架我要做问题,请帮我! 中山陵简介 50字100以内就可以 一项工程,甲队6天完成,乙队8天完成,两对合作多少天完成工程的3分之2 ? 每天看书的5分子1还多10页,4.5天看完这本书,问这本书一共多少页? 关于梦的作文.是梦,不是梦想. 中方称人民币不存在明显低估 外汇市场中方严重关切美监听活动报道 要求美方46名中国与印度非法采金者在加纳被捕浙江实现县县电气化 镇村电气化比日痴情男等红灯偶遇女子生情愫 疯狂跟南非“刀锋战士”谋杀案再添非法持有弹76件日本国家重要文化财产下落不明 宠物可充当锻炼器材 带狗做瑜伽成欧美巴黎迪士尼出事故致5岁男童落水 已无《世界新闻报》窃听案8名被告中有3人日本政府将向救童中国留学生颁发感谢信数据显示日本近5年间借智能手机偷拍案《世界新闻报》窃听案8名被告中有3名波兰外长:乌克兰与欧盟结盟协议签署可纽约遭飓风袭击一周年 数千灾民仍无家德国380公斤女子出门就医 消防队出小猫将斗牛犬尾巴当做逗猫棒玩 网友直俄吁欧盟勿逼迫独联体国家在二者之间做突尼斯发生自杀式袭击 造成袭击者自身德国锁定美情报部门窃听站位置 位于使美国安局总监否认曾非法窃取谷歌和雅虎图片报道引导游客文明要善用“巧劲儿”(文明出中国 东盟博览会:走向全方位务实合作“青年人在行动”北京论坛开幕国土部开展网上培训 节约费用300万“救援尽了最大努力”西部计划十周年座谈会召开中国和东盟合作的广阔舞台“梦想”开启新学年国家泡菜质检中心启用我国经济步入稳中求进的新征程(经济形涉毒犯罪找上网络聊天室楷模标注“共同价值观”(今日谈)花开之境陈昌智会见各国议会联盟主席拉迪以营改增深化财税体制改革(时论精粹)和城管一起去“执法”成立全省首个“商圈党委”我科研人员发现抑郁症分子机制过一个风清气正的节日中央社会主义学院
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘