vb 修改ini文件
程序所在目录有一个1.ini文件里面的内容是:a=11b=22c=33单击按钮1的时候修改1.ini,为c=44单击按钮2修改1.ini为c=55怎么样才能达到这种效果,...
程序所在目录有一个1.ini文件
里面的内容是:
a=11
b=22
c=33
单击按钮1的时候修改1.ini,为c=44 单击按钮2修改1.ini为c=55
怎么样才能达到这种效果,最好有注悉,谢谢 展开
里面的内容是:
a=11
b=22
c=33
单击按钮1的时候修改1.ini,为c=44 单击按钮2修改1.ini为c=55
怎么样才能达到这种效果,最好有注悉,谢谢 展开
1个回答
2013-11-06
展开全部
你没有给出这几个ini键所在的项。一般INI的格式是这样的 [项名称]键名称=键值.....读写INI文件,可以使用API,以下为API引用声明Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long
参数说明lpApplicationName 上面例子中的 项名称lpKeyName 上面例子中的 键名称 (也就是你说的a,b,c)lpDefault 取值时的默认值(如果不存在该键时按该值返回)lpReturnedString 取值返回到的变量名(字串型)nSize 取值长度大小lpFileName INI文件名 调用举例dim a as stringa=space$(30) '取30长度GetPrivateProfileString 项名称,"a","11",a,30,"C:\abcd\1.ini"
Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long
参数说明lpApplicationName 上面例子中的 项名称lpKeyName 上面例子中的 键名称 (也就是你说的a,b,c)lpDefault 取值时的默认值(如果不存在该键时按该值返回)lpReturnedString 取值返回到的变量名(字串型)nSize 取值长度大小lpFileName INI文件名 调用举例dim a as stringa=space$(30) '取30长度GetPrivateProfileString 项名称,"a","11",a,30,"C:\abcd\1.ini"
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询