请给一些VB中对文件进行操作的相关信息!!!谢了

[jeapvan]

我现在想从一个自己定义的INI文件中读取其中的内容,内容就是一个电话号吗？请问应该如何操作呢???我是新接触VB不知道其中的一些语句,请各位大师指点!!!

[cbzdream]

www.baidu.com 搜索vb ini文件.有一堆

[deallylau]

Public 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
Public Declare Function WritePrivateProfileString Lib "Kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As Any, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lplFilename As String) As Long


读：
HValue = String$(20, " ")
GetPrivateProfileString "YearFormula", vskey, "", HValue, Len(HValue), App.Path & "\YearFormula.Ini"
写：
HValue = "0"
WritePrivateProfileString "YearFormula", vskey, "0", App.Path & "\YearFormula.Ini"

[randomx]

open app.path & "你的文件名.ini" for input as #read
input #read , phone
close #read
就这么简单吧？