VB读写ini文件[1]

[入库:2005年8月18日] [更新:2007年3月24日]

本文简介:选择自 shuyi 的 blog

 

自从注册表诞生以来ini文件正在逐渐失去其市场占有率,然而基于ini文件的独立性,致使其还没有到达退出历史舞台的地步,很多应用程序的初始化和一些界面参数的设置仍然很愿意从ini文件中读取,为了保证操作需用参数对ini文件的读取的通明性,建议使用一个模块来完成此工作。注:所有操作调用标准的win api函数来完成。

dim ret as long

dim start as long

public filename as string

const bufsize = 10240

dim buf as string * bufsize

private declare function getprivateprofileint lib "kernel32" alias "getprivateprofileinta" (byval lpapplicationname as string, byval lpkeyname as string, byval ndefault as long, byval lpfilename as string) as long

 

private declare function getprivateprofilesection lib "kernel32" alias "getprivateprofilesectiona" (byval lpappname as string, byval lpreturnedstring as string, byval nsize as long, byval lpfilename as string) as long

 

本文关键:ini
  相关方案
Google
 

本站最佳浏览方式为 分辨率 1024x768 IE 6.0(或更高版本的 IE浏览器)

go top