diff --git a/Global_Indexer/ClassControls.vb b/Global_Indexer/ClassControls.vb
index e282989..ea4cbae 100644
--- a/Global_Indexer/ClassControls.vb
+++ b/Global_Indexer/ClassControls.vb
@@ -75,6 +75,7 @@ Public Class ClassControls
                     .IndexType = DataType
                 }
             }
+            oControl.Properties.AppearanceFocused.BackColor = Color.Lime
 
             If Not String.IsNullOrEmpty(Vorgabe) Then
                 Dim oDefaultValues As New List(Of String)
@@ -372,6 +373,7 @@ Public Class ClassControls
                 .IndexType = DataType
             }
         }
+        oPicker.Properties.AppearanceFocused.BackColor = Color.Lime
 
         Return oPicker
     End Function