Imports System.IO
Imports System.Runtime.InteropServices
Imports System.Text
 
Public Class INI
    <DllImport("kernel32", EntryPoint:="GetPrivateProfileString")>
    Public Shared Function Lesen(
    ByVal Sektion As String, ByVal Key As String, ByVal StandartVal As String,
    ByVal Result As StringBuilder, ByVal Size As Int32, ByVal Dateiname As _
      String) As Int32
    End Function
End Class

Dim result As New System.Text.StringBuilder
Dim re As Integer = INI.Lesen("aaaa", "bbbb", "xcxxx", result, 256, _
  "C:\daten\ini.txt")

Zitat:

Allerdings sind Ini-Dateien veraltet. Denke über den Gebrauch von Setting-Variablen nach.