MS Changes language

app/DD_Clipboard_Searcher/frmMain.vb

@@ -21,6 +21,7 @@ Public Class frmMain
     Private _DataASorDB As ClassDataASorDB
 
     Public Sub New()
+
         ' Dieser Aufruf ist für den Designer erforderlich.
         InitializeComponent()
 
@@ -29,10 +30,12 @@ Public Class frmMain
         splash.ShowDialog()
         If ERROR_INIT <> "INVALID USER" Then
             Dim Culture = CultureInfo.CreateSpecificCulture(USER_LANGUAGE)
+
             ' The following line provides localization for the application's user interface.
             Thread.CurrentThread.CurrentUICulture = Culture
             ' The following line provides localization for data formats.
             Thread.CurrentThread.CurrentCulture = Culture
+            Thread.CurrentThread.CurrentUICulture = New CultureInfo(USER_LANGUAGE)
             ' Set this culture as the default culture for all threads in this application. 
             ' Note: The following properties are supported in the .NET Framework 4.5+
             CultureInfo.DefaultThreadCurrentCulture = Culture