<Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.Configuration.SpecialSettingAttribute( _
         Global.System.Configuration.SpecialSetting.ConnectionString),  _
         Global.System.Configuration.DefaultSettingValueAttribute("Data" & _
         "Source=MeinDatenbankserver;Initial Catalog=MyDatenbank;Persist" & _
         "Security Info="& _ 
            "True;User ID=sa;Password=dd")>  _
        Public ReadOnly Property ConnectionString() As String
            Get
                Return CType(Me("ConnectionString"),String)
            End Get
        End Property

Ich glaube nicht, dass Zitronenfalter wirklich Zitronen falten