VB6.0实现读写配置文件(*.ini文件)
'声明:
Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA
Declare Function WritePrivateProfileStrin 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
'读写例子:
Sub RWConfigFile()
End Sub
config.ini配置文件格式:
[config]
para1=你好abc111 para2=123 para3=写文件测试
特别提示:
声明在模块内,配置文件中值两边的空格会被忽略掉。“para1=你好abc111” 和 “para1= 你好abc111
如果文件没有全路径,而是只写文件名config.ini,则读写路径为%windir%\config.ini。
说明:上面的文章虽然是转载来的,不过我测试后读写字符串没问题但读整数部分不正确,希望能对才学VB6.0的朋友们有所帮助 |
|