急急急～～怎样用vb.net读.ini文件中的数据？

来源：百度知道 编辑：UC知道 时间：2024/06/15 12:57:18
用vb.net读.ini文件中的数据，输出的结果却是程序中设置的默认值，而不是.ini文件中储存的值，应该怎么处理啊？

我是新手，超级菜鸟的那种，很急很急，哪位高人指点一下！
万分感谢～～

用API
Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Int32, ByVal lpFileName As String) As Int32

Public Function GetINI(ByVal Section As String, ByVal AppName As String, ByVal lpDefault As String, ByVal FileName As String) As String
Try

Dim Str As String = String.Empty
Str = LSet(Str, 256)
GetPrivateProfileString(Section, AppName, lpDefault, Str, Len(Str), FileName)
Return Microsoft.VisualBasic.Left(Str, InStr(Str, Chr(0)) - 1)

Catch ex As Exception
Throw ex
End Try
End Function