魔界の仮面弁士さんレスありがとうございます。
宣言部分を直してみました。integerも止めて、UInt32にしました。

Declare Auto Function GetPrivateProfileString Lib "kernel32" _
Alias "GetPrivateProfileString" ( _
<MarshalAs(UnmanagedType.LPTStr)> ByVal lpApplicationName As String, _
<MarshalAs(UnmanagedType.LPTStr)> ByVal lpKeyName As String, _
<MarshalAs(UnmanagedType.LPTStr)> ByVal lpDefault As String, _
<MarshalAs(UnmanagedType.LPTStr)> ByVal lpReturnedString As StringBuilder, _
                                  ByVal nSize As UInt32, _
<MarshalAs(UnmanagedType.LPTStr)> ByVal lpFileName As String) As UInt32