Validation and stuff

MultiTool.Form/frmConfig.vb

@@ -5,8 +5,7 @@ Imports DigitalData.Modules.Logging
 
 Public Class frmConfig
     Public Property ConfigManager As ConfigManager(Of MultiTool.Shared.Config)
-    Private LogConfig As LogConfig
-    Private FormHelper As FormHelper
+    Private ReadOnly FormHelper As FormHelper
 
     Private ReadOnly Property Config As MultiTool.Shared.Config
         Get
@@ -19,14 +18,14 @@ Public Class frmConfig
         InitializeComponent()
 
         ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
-        LogConfig = pLogConfig
         FormHelper = New FormHelper(pLogConfig)
     End Sub
 
     Private Sub frmConfig_Load(sender As Object, e As EventArgs) Handles MyBase.Load
         Dim oConnectionString = MSSQLServer.DecryptConnectionString(Config.ConnectionString)
-        Dim oBuilder As New SqlConnectionStringBuilder(oConnectionString)
-        oBuilder.InitialCatalog = "DD_ECM"
+        Dim oBuilder As New SqlConnectionStringBuilder(oConnectionString) With {
+            .InitialCatalog = "DD_ECM"
+        }
 
         TBEDI_XML_ITEMSTableAdapter.Connection.ConnectionString = oBuilder.ToString()
         TBEDI_XML_ITEMSTableAdapter.Fill(Me.DS_DD_ECM.TBEDI_XML_ITEMS)