MS_12.03.2016

This commit is contained in:
SchreiberM
2016-03-14 09:21:32 +01:00
parent c3965e6243
commit 32a1c4cf5e
31 changed files with 2208 additions and 2864 deletions

View File

@@ -60,7 +60,8 @@ Public Class ClassControlBuilder
End Sub
Public Sub OnTextBoxFocus(sender As Object, ByVal e As EventArgs)
Dim box As TextBox = sender
box.BackColor = Color.Lime
box.BackColor = Color.LemonChiffon
box.SelectAll()
End Sub
Public Sub OnTextBoxLostFocus(sender As Object, ByVal e As EventArgs)
@@ -72,7 +73,7 @@ Public Class ClassControlBuilder
End Sub
Public Sub OnComboBoxFocus(sender As Object, ByVal e As EventArgs)
Dim combo As ComboBox = sender
combo.BackColor = Color.Lime
combo.BackColor = Color.LemonChiffon
End Sub
Public Sub OnComboBoxLostFocus(sender As Object, ByVal e As EventArgs)
Dim combo As ComboBox = sender