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

Windows 初始化文件的修改 -VB资料

HTML文档下载 WORD文档下载 PDF文档下载
Windows 初始化文件的修改 -VB资料
Windows应用程序的初始化文件(INI)对应用程序缺省设置起着重要的作用,初始化文件可以采用文本编辑器修改,但这种方法容易出现错误,不易由用户操作。下面介绍用VB实现修改初始化文件的方法。

1初始化文件的结构与特点
Windows应用程序初始化文件中通常设置应用程序的运行环境,确定应用程序变量的缺省设置,初始化文件既包含Windows本身的两个INI文件,也包括应用程序的初始化文件。如:win.ini、system.ini、ucdos.ini、vb.ini等。
其中,ucdos.ini、 vb.ini分别为希望公司的UCDOS和Visual Basic的初始化文件,这些初始化文件一般都是由应用程序和关键词构成,文件中内容的格式采用下面的通用格式:
[程序名称]
关键词=取值
例如,在system.ini中有一段内容设置非WINDOWS应用程序的字体,即:
〔Non WindowsApp〕
FontChangeEnable=1
其中,Non WindowsApp为应用程序名,FontChangeEnable为关键词,1为取值。

2与初始化有关的API函数
Windows95中的动态链接库Kernel.exe包含了六个函数,可以对INI文件进行操作,其中GetProfileInt、GetPrivateProfileInt、GetProfileString和GetPrivateString四个函数可以从INI文件中基于应用程序名和关键词的行获得信息。WritePrivateProfileString和WriteProfileString两个函数可以在INI文件中修改或创建文件中的有关行。

在VB应用程序中应按下面的方式在全局模块中进行声明。
Declare Function GetProfilelnt Lib ″Kernel″ (ByVal lpAppName As String, ByVal lpKeyName As String, ByVal nDefault As Integer) As Integer

Declare Function GetProfileString Lib ″Kernel″(ByVal lpAppName As String, lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedsring As String, ByVal nSize As lnteger) As Integer

Declare Function WriteProfileString Lib ″Kernel″(ByVal lpApplicationName As String, lpKeyName As Any, lpString As Any) As lnteger

Declare Function GetPrivateProfilelnt Lib ″Kernel″ (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal nDefault As lnteger, Byval lpFileName As String) As lnteger

Declare Function GetPrivateProfileString Lib ″Kernel″(ByVal lpApplicationName As String, lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As String, ByVal nSize As Integer, Byval lpFileName As String) As Integer

Declare Function WriteProfileString Lib ″Kernel″(ByVal lpApplicationName As String, lpKeyName As Any, lpString As Any) As lnteger

其中:lpApplicationName$为应用程序名称;
lpKeyName$为关键词;
nDefault%为关键词指定的缺省值;
lpFileName$为初始化文件名称;
lpDefault$为关键词指定的缺省字符串;
lpReturnString$为接受返回值指定字符的缓冲变量;
nSize%指定拷贝到缓冲变量的字符个数;
lpString$为新的关键词指定字符串。
上面的声明可以从VB目录上的winapi中文件win32txt获得,可以通过剪贴板直接拷贝到VB中。
3修改初始化文件实例
Windows软件包程序管理器(PROGRAMEXE),初始化文件为PROGRAM.INI,缺省内容为
[Settings]
……
order=6 3 2 4 7 1
……
其中,order指定程序组的排列顺序,下面的程序把Order的值改为“2 3 4 1 7 6 5”,并使用SHELL函数启动程序管理器。
Private Sub form_Click()
lpAppName$ = ″Settings″
lpKeyName% = ″Order″
lpString$ = ″2 3 4 1 7 6 5 ″
lpFileName$ = ″progman.ini″
j% = WritePrivateProfileString(lpAppName$, lpKeyName$ =″Order″, lpString$ = ″2 3 4 1 7 6 5″, lpFileName$)
j% = Shell(″progman.exe″, 1)
End Sub
让Dreamweaver支持cshtml (MVC Razor环境) iOS付费榜首:日历应用Fantastical开发者专访 玩转AdMob移动广告:捕鱼达人的猎财之道 12306抢票插件拖垮GitHub 展望2013 jQuery核心团队成员谈其发展路线 Facebook社交视觉搜索分析:引入“竞价排名”? 移动广告现状5大问题解析 Google将于月底举行Google Glass开发者大赛 分享29个超赞的响应式Web设计 Facebook图谱搜索和谷歌搜索有何不同? Facebook向美国iPhone用户提供免费电话 VMware CTO Steve Herrod离职 加盟风险投资公司 维基百科基金会推出众包旅游项目Wikivoyage 最舒适程序员:工作外包给中国 自己却偷懒 Evernote正在与苹果联合开发硬件记忆工具,未来两年公司上市 Fusion-io发布ioScale 全闪存数据中心时代到来? Agent Dash游戏设计之美:如何用2D打造3D体验? 开源项目文档应规避的13处“硬伤” 李开复:Graph Search将可与谷歌搜索媲美 月成本3500美元 如何在AWS上实现BBVA信用卡低延时分析 外媒眼中的国内互联网巨头:服务器集群庞大但缺乏创新 Facebook主导通用主板+SoC ARM与Intel同台对抗 假如像招聘程序员那样租车…… CrowdStar:Windows Phone 8是开发者的下一片蓝海 腾讯云总经理陈磊透露流量变现计划 将比亚马逊AWS更专注 代码之美——Doom3源代码赏析 英特尔公布2012财年财报 Q4净利润同比下滑27% 谷歌CEO佩奇:创新重于竞争 关注非增量改进 再尝败绩 微软杀软AV-TEST反病毒认证失败 财富:2013最佳雇主 谷歌第一微软75苹果未入榜 移动应用注册表单必死! CString<-->int 我想做个Treeview,有四层,每层上都有好多数据,没做过,看书也没看出东东来。 寻人:半剑穿心 有一DBGrid问题请教? 生于70年代 一个关于ADO数据库的问题? 我也调查行不行?———你用什么激励自己------- 哥几个乐乐呵呵! 同志们,请教对于文件的操作 !!! 高手思考:C++ Builder 5 动态生成控件,并可以拖动改变其大小,位置 Kylix的so难题?Kylix高手请进!!! InsideCOM中第十章里Util.cpp的报错,请前辈指点。 关于在ATL中使用 ::LoadLibrary("FirmClient.dll")一说 大虾们 过来看看吧 {icongrid 1..192}是什么意思?请教。。。 吴文智,交个朋友,好吗 请问我INSTALL第三方控件怎么老是提示说*.DCU文件not found啊,我用的是D6,应怎么解决? To: foolishtiger(吴文智) ,请教你一个问题!!! 一个关于EJB的问题,急!急啊 请教DBGrid问题如下: tomcat连接数据库oracle?用javabean? 请教:ORACLE ENTERPRISE MANAGER怎么连接 怎样做半透明窗口? 怎样用程序安装输入法? InsideCOM中第十章里Util.cpp的报错,请前辈指点阿。 dephi中有没有显示流程图的控件? 数据库有自动加锁的功能。那我是否可以在一个过程中,靠代码去主动给一个表,多个表加锁,解锁呢?? 一道scjp考题,问题答案都有,谁看明白了给俺解释一下,会送分的 急急急,40分想送!!!!! b/s结构下的新邮件提示问题(重赏!!!) 哪里可下载WINXP DDK和SDK 别忘了向我祝贺啊,今天也是我的生日!! 如何让光标不离开DBGrid的当前行,就将当前记录的修改提交数据库 好心的大虾们,帮帮我!有关gis的 ORACLE的触发器怎么弄 用C++怎样统计文本文件中的字符个数,请给源代码 讨论:不经人大批准给公务员加薪是腐败行为? http://www.csdn.net/expert/topic/389/389043.shtm 怎么样才能将*.pdf文件转成*.doc 急急急急……快帮忙,icevi,弱水快帮忙。 JAVASCRIPT 中怎么样用VBA的函数? 用VB怎样遍一个程序用列表的形势,找到并显示局域网中所有已经打开的SQL服务器名? C++标准类库中有没有类提供<<操作符输出调试信息? JAVASCRIPT 中怎么样用VBA的函数?我急呀~ ~~~~~~好心的大虾们,帮帮我,关于gis~~~~~~~~~~~~ 关于在mfc中使用stl中的警告问题? 关于视频播放控件的开发 在单位上了网通,我们通过局域网上internet,可是服务器装了wingate…… 怎样在程序里实现window下“打开方式”对话框,具体用什么类? 我下载了好多经典书籍(十几本),都不知道该从哪儿看起? 怎么处理没有用的连接文件? 问个菜问题 怎么读数(重点0的读法)怎么写数(重点0的写法 老师让写一片作文,《一堂精彩的语文课》,要用到侧面描写,600字左右 快 速求 这道双曲线数学题怎么做?设P点在以F1、F2为左右焦点的双曲线C:(x^2/a^2)-(y^2/b^2)=1(a>0,b>0)上,PF2⊥x轴,PF2=3,点D为其右顶点,且F1D=3DF2. ⑴求双曲线C的方程 ⑵设过点M(2,0)的直线l与双曲线C交于不同 某数加上3.4就得整数,这个数减去3.7所得的差的整数部分是最小的两位小数,这个数是( )谁能帮我回答上, 快乐语文2011征文《伤痕累累的地球》怎么写?400字的,要小学生的, 3002000用汉字应怎么书写读法(小学数学题) 童年趣事作文 (x-1)(x+3)=12怎样十字相乘. 一堂精彩的语文课 作文教我怎么写就行了!今天就要答案 作文《童年趣事》550字左右!要给我一个启示,激励我的将来!要大约7-8岁时候的事情! 我想知道这个数学符号的意思和读法 一堂语文课作文 该怎么写?先写什么再写什么?要怎样才能写好?这是我的开头部分,接下来该怎么写?在我的学校生活中,上过无数节各种各样课,它们就像一艘大船,载着我在知识的海洋里 《童年趣事》 作文要是真实的,自己写的,越快加的分越多! (3/x-3)-(2/x-2)=(1/x-1)是不是用十字相乘 初一 第1节语文课作文 咖啡因(化学式为C8H10N4O2),咖啡因能兴奋中枢神经、消除疲劳.如果一杯咖啡含有194mg咖啡因,你知道这杯咖啡中有多少个咖啡因分子吗? 数学的读法请问万位上全是0(例:300003000),该不该读? 是读 三亿零三千,还是读 三亿三千? 十字相乘3x^2-16x+5=0十字相乘例:1 -53× -3应该是横着写(x×-5)(3x× -3)还是斜着写(x×-3)(3x×-5)? 将250ml,密度为1.1g/cm^3 H2SO4的质量分数为24.5%的硫酸中适量铁屑充分反应.计算(1)此硫酸中H2SO4 的物质的量浓度(2)生成H2的体积(3)将生成的硫酸亚铁配成400ml 溶液,此溶液中硫酸亚铁的物 (x+1)(x+2)(x+3)(x+4)-8 十字相乘因式分解. 2x^2-3x-5 也就是十字相乘的方法 要详细思路的 不要只有答案2x^2-3x-5 =0.我不知道十字相乘的方法 12.6gNaHCO3(s)加热一段时间后,测得剩余固体的质量变为9.5g,(1)求生成Na2CO3的质量(2)当剩余固体的质量为多少时,表明NaHCO3已完全分解 幼儿园阿姨发糖果,每人4个,则多10个;每人5个,则少4个,有多少个小孩?他们共分多少个糖果? 幼儿园给小朋友分糖果,如果每人分5 个,还剩13块;如果每个小朋友分6块,就 少7块.问有小朋友和糖各多少 取一定量的Na2CO3和Na2SO4混合物溶液与过量盐酸反应,生成2.016LCO2(标准状况),然后加入足量的Ba(OH)2溶液,得到沉淀的质量为2.33g 试计算混合物中Na2CO3和Na2SO4的物质的量分别为多少? 读法103965192 幼儿园小朋友分糖果,如果每人分8颗还剩20颗.如果分10颗还差20颗.问,有多少个小朋友?有多少颗糖? 某百货商城经销一种儿童服装,每件售价50元每天可以销售80件,每件可获利10元,为了迎接六一儿童节,商场决定采取适当的降价措施,扩大销售量,让利消费者,经市场调察发现:每件童装每降价一 因式分解:(x-1)(x-2)(x-3)(x-4)-48 (最好用十字相乘) 快乐语文举办的第十三届海峡冰心杯征文比赛题目是什么 整数部分是零的最大一位小数与最小一位小数的和是(),差是() 我最喜欢的一堂语文课 作文600字 快乐语文第十四届冰心杯征文题目是什么?老师让我们全班都去写冰心杯,我是第一次,最好告诉我文章是用编的,还是真实的. 一个三位小数的整数部分是零,这个数最大是几,最小是几? 我最喜欢的一堂语文课 作文哥哥姐姐们,差不多400字,不要太多. 快乐语文第十五届征文主题是什么? 3x^2+x=0 用十字相乘分解(要过程)一年没用了,忘记了.. 求我最喜欢的一堂语文课作文.600字以上 小数的含义 快乐语文的征文“热爱生命 快乐成长”怎么写?急.............. 我最喜欢的第一堂语文课 作文 初中的300个字就行了! 要新生的速度来啊!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 小朋友分饼干,若每人分4块,则多9块;若每人分5块,则少6块,问有多少个小朋友?有多少块饼干?我不会用方程. 快乐语文有《热爱生命 快乐成长》的征文吗?如果有, 作文:我最喜欢的一堂语文课 谁能帮我选选《快乐语文》第十三届热爱生命的题目 有关于“热爱生命,快乐成长”的征文吗 小学四年级数学奥数题第一位数是66,第二位数是54,从第一位数拿多少是第二位数的2倍 小数的定义是什么 0.0是小数吗? 快乐语文《热爱生命 快乐成长》的100个题目不要别的,只要那100个题目. 一个五位数的千位上是6,这个五位数的近似值最小是几万,最大是几万. 小数是怎样定义的? 征文《热爱生命,快乐成长》怎么写? 数学思维好有多少种读法?数学 学思 思 思维 维 维 维好 好 好 好 好 防炮洞里格外沉静,战士们心里在想些什么?至少五句 为了庆祝六一儿童节,百货商店童装部所有童装降价30%出售 点点的妈妈要买1套童装,上衣原价298元,裤子原价188元 他带了400元, 关于十字相乘分解的计算题 1.(2x+1)(3x+3) 2.2x^2-x-3 3.3b^2+14b-5 防炮洞里格外沉静,战士们心里在想些什么 兰兰向妈妈要6角钱买一根冰棒.妈妈叫兰兰从袋子里取.袋子里有1角、2角、5角的纸币各6张,兰兰要拿六角钱,可以有几种拿法?用算式表示出来. 3x^2-2x-6用十字相乘法怎么算? 主要内容讲了:在抗美援朝时.战争基地的一个防炮洞里来了一个运输员.他给连长一个苹果.但是防炮洞里的战士们都舍己为人.最后大家一起吃.但是吃了一圈.还剩下一大半.战士们都被此感动
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn