获取配置文件一直用的好好的程序突然报错用不了
而且打开其它的程序这段GetINI("system configuration", "requestapi", "", path1)代码也在同样报错
'窗体中的代码
Public request_api = GetINI("system configuration", "requestapi", "", path1)



'模块中代码
'定义读取配置文件函数
Public Function GetINI(Section As String, AppName As String, lpDefault As String, FileName As String) As String
Dim Str As String = LSet(Str, 256)
GetPrivateProfileString(Section, AppName, lpDefault, Str, Len(Str), FileName)
Return Left(Str, InStr(Str, Chr(0)) - 1)
End Function