Imports System.IO, System.Configuration, System.Collections.Specialized

Dim Eintrag As String = System.Configuration.ConfigurationManager.AppSettings( _
  "test")
MsgBox(Eintrag)
 
Dim appStgs As NameValueCollection = ConfigurationManager.AppSettings
For i As Integer = 0 To appStgs.Count - 1
MsgBox(appStgs(i))
Next

   <userSettings>
        <My.MySettings>
            <setting name="pathSstMdb" serializeAs="String">
                <value />
            </setting>
        </My.MySettings>
    </userSettings>
    <applicationSettings>
      <My.MySettings>
            <setting name="test" serializeAs="String">
              <value>Teststring 2</value>
            </setting>
        </My.MySettings>
    </applicationSettings>

Gru? asam