VB 初学者，应该怎么做ini 文件呢？和怎样在VB中调用。

Question

呵呵,刚用的一段代码:
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 GetPrivateProfileInt Lib "kernel32" Alias "GetPrivateProfileIntA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal nDefault As Long, ByVal lpFileName As String) As Long
Private Sub Form_Load()
    '写
    WritePrivateProfileString "Sample", "Sample", "55", App.Path  "\sample.ini"
    '读
    MsgBox GetPrivateProfileInt("Sample", "Sample", 0, App.Path & "\sample.ini")
End Sub

Answer 1

具体请看http://skinart.y365.com/myprogram/gt.zip

Answer 2

我写了一篇关于读写ini文件的文章，请见：http://ourdelphi.myrice.com(VB版)