Dim Result As New String(" ", 40)
 
 
        Dim Folder1 As Long = IniEinlesen("Folders", "OtonFolder", "Kein Ordner" & _
          "Gewaehlt", _
        Result, Result.Length, "C:\Sprachlabor\Konfig.Ini")
 
        OtonFolder = Result
 
 
        Dim Folder2 As Long = IniEinlesen("Folders", "LocalFolder", "Kein" & _
          "Ordner Gewaehlt", _
        Result, Result.Length, "C:\Sprachlabor\Konfig.Ini")
 
        LocalFolder = Result

Dim a As String
        Dim lfolder As String = "C:\"
        Dim sfile As String = "test.pdf"
        'a = LocalFolder
        a = lfolder & sfile
        MsgBox(a)
 
        Dim b As String
        b = Value & StudiFile
        MsgBox(b)
        Dim c As String

LocalFolder.Trim()
        StudiFile.Trim()
        value=1
        c = Value & StudiFile & Value
        MsgBox(c)

- Signaturen werden nur von Weicheiern ausgef?llt -