正在阅读：VB经典:操作.ini文件的通用类源代码VB经典:操作.ini文件的通用类源代码

2004-03-10 09:52 出处：CSDN 作者：goj2000 责任编辑：linjixiong

一个绝对经典的在VB中操作.ini文件的通用类源代码

程序界面：

源程序：

classIniFile.cls的内容：

Option Explicit

'--------classIniFile.cls 代码----------------
'这里定义了一个classIniFile类
'一个绝对经典的在VB中操作.ini文件的通用类源代码
'程序编写：中国青岛·许家国
' 2002.6.16
'E－Mail: goj2000@163.com
'HomePage: http://www.gojclub.com
'
'Private member that holds a reference to
'the path of our ini file

Private strINI As String

'Windows API Declares
Private 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

Private Declare Function GetPrivateProfileString _
Lib "kernel32" Alias "GetPrivateProfileStringA" _
(ByVal lpApplicationName As String, _
ByVal lpKeyName As Any, _

察看评论详细内容我要发表评论