



免费预览已结束,剩余1页可下载查看
下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
第一步:打开你的VB工程,点击菜单【外接程序】【外接程序管理器】,就会弹出外接程序管理器(如图12)图1图2:外接程序管理器第二步:在外接程序管理器中找到”VB 6 资源编辑器”,选中它,然后在右下角的选项中选中“在启动中加载”和“加载/卸载”这两项(如图3)图3第三步:点击菜单【工具】【资源编辑器】,打开资源编辑器图4图5:资源编辑器点击这里添加自定义文件下面我们添加一个名为ZiYuan.DAT的文件图6添加之后,返回到资源编辑器窗口见图7(下一页)注意:一定要记住你添加的文件的序号“101”,文件添加之后是不保存文件名的,这个“101”是唯一能确定这个文件在资源文件中的位置然后保存资源文件:点击资源编辑器上方的保存按钮,在弹出的保存对话框中找到你当前工程的目录保存就行第四步:如何在程序中提取资源文件假设我们的程序需要使用这个ZIYuanDAT文件,我们可以在程序使用该文件之前把它从资源文件里提取出来例如我们在窗体的加载事件中提取资源文件,并保存到程序目录中,保存为ZIYuan.datPrivate Sub Form_Load() Dim FileByte() As Byte 用来缓存文件内容 Dim sName As String 要生成的文件名称 If Right(App.Path) = Then 当是根目录时候有 sName = App.Path & ZiYuan.dat Else sName = App.Path & ZiYuandat End If If Dir(sName) sName Then 如果该文件不存在就建立它 FileByte() = LoadResData(101, CUSTOM) 101是文件号 Open sName For Binary As #1 Put #1, , FileByte Close #1 End If 至此该文件已经动态生
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 绿化项目款申请报告(3篇)
- 争霸联考与超级课件的区别
- 工程施工劳务承包合同(标准版)
- 信托债券合同(标准版)
- 服务器外包合同(标准版)
- diABZI-a1-生命科学试剂-MCE
- Desamino-P-ethoxy-glufosinate-ethyl-ester-d3-生命科学试剂-MCE
- 融资困难导致运营中断应急预案
- 临终关怀剧本课件
- 十年(2016-2025)高考英语真题分类汇编:专题07 情态动词和虚拟语气(全国)(原卷版)
- JG/T 127-2007建筑门窗五金件滑撑
- CJ/T 180-2014建筑用手动燃气阀门
- 海参池养殖合作合同协议书
- 日本《大肠癌治疗指南》解读
- 高考语文专题复习:构词方式
- 中国宠物服务行业市场发展分析及发展前景与投资策略研究报告
- 设计院管理规章制度手册及实施指南
- 医院转诊合同标准文本
- 新课标解读丨《义务教育道德与法治课程标准(2022年版)》解读课件
- 《土木工程施工技术与组织(第4版)》思政素材-第4章 混凝土工程
- 2025年建筑施工安全管理人员考试题库试题
评论
0/150
提交评论