May i ask why i will get error message on this code (RetrieveFromIniFile) did i missing something can someone take a look for me

[christing]

Public Function RetrieveFromIniFile(ByVal strHeader As String, ByVal strtitle As String, ByVal strDafaultData As String, ByVal strPath As String)
Dim n As Int32
Dim sData As String = Space$(1024)
n = GetPrivateProfileString(strHeader, strtitle, strDafaultData, sData, sData.Length, strPath)
If n > 0 Then
Return sData.Substring(0, n)
Else
Return strDafaultData
End If
End Function

Continue reading...