VB6快速读写INI文件

ReadINIValue

说明：读取INI文件指定节点的值。
参数：
SectionName:项目名称，对应INI文件的 [项目名称]
KeyName:节点名称，对应INI文件的 XXX=XXX
DefaultValue:默认值，如果不存在INI文件或不存在此节点的默认值
INIFile:INI文件的路径，如果是当前目录可直接写文件名。
MaxLen:最大读取长度。当值为-1时，从INI文件读取长度，读取失败使用256。

引用：
Public Declare Function ReadINIValue Lib "VB6Plus.dll" (ByRef SectionName As String, ByRef KeyName As String, Optional ByRef DefaultValue As String = "", Optional ByRef INIFile As String = "Config.ini", Optional ByVal MaxLen As Integer = -1) As String

示例：
txtLog.Text=ReadINIValue("Main","Title")

WriteINIValue

说明：向INI文件指定节点写入值，不存在INI文件自动创建。
参数：
SectionName:项目名称，对应INI文件的 [项目名称]
KeyName:节点名称，对应INI文件的 XXX=XXX
Value:值
INIFile:INI文件的路径，如果是当前目录可直接写文件名。
SaveKeyValueLen:将长度保存到INI文件中。0-不保存 1-保存

引用：
Public Declare Function WriteINIValue Lib "VB6Plus.dll" (ByRef SectionName As String, ByRef KeyName As String, ByRef Value As String, Optional ByRef INIFile As String = "Config.ini", Optional ByVal SaveKeyValueLen As Integer = 1) As Boolean

示例：
WriteINIValue "Main","Title","你好！"