edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

GUI Änderungen Bonitäten, Creditsafeausnahme für Unisped

Browse Source
This commit is contained in:
d.breimaier
2022-12-16 16:49:36 +01:00
parent d2dd3943bb
commit dc1f5281fc
3 changed files with 35 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
SDL/kunden/usrCntlKundenuebersicht.vb
View File

@@ -567,13 +567,28 @@ Public Class usrCntlKundenuebersicht
' select case backgrounndcolor
Select Case lblBonitaetRisikostufe.Text
Case "A", "1" : lblBonitaetRisikostufe.BackColor = Color.Green
Case "B", "2" : lblBonitaetRisikostufe.BackColor = Color.LightGreen
Case "C", "3" : lblBonitaetRisikostufe.BackColor = Color.Yellow
Case "D", "4" : lblBonitaetRisikostufe.BackColor = Color.Orange
Case "E", "5" : lblBonitaetRisikostufe.BackColor = Color.Red
Case "F", "6" : lblBonitaetRisikostufe.BackColor = Color.Red
Case Else : lblBonitaetRisikostufe.BackColor = Color.WhiteSmoke
Case "A", "1"
lblBonitaetRisikostufe.BackColor = Color.Green
lblBonitaetRisikostufe.ForeColor = Color.White
Case "B", "2"
lblBonitaetRisikostufe.BackColor = Color.LightGreen
lblBonitaetRisikostufe.ForeColor = Color.White
Case "C", "3"
lblBonitaetRisikostufe.BackColor = Color.Yellow
lblBonitaetRisikostufe.ForeColor = Color.White
Case "D", "4"
lblBonitaetRisikostufe.BackColor = Color.Orange
lblBonitaetRisikostufe.ForeColor = Color.White
Case "E", "5"
lblBonitaetRisikostufe.BackColor = Color.Red
lblBonitaetRisikostufe.ForeColor = Color.White
Case "F", "6"
lblBonitaetRisikostufe.BackColor = Color.Red
lblBonitaetRisikostufe.ForeColor = Color.White
Case Else
lblBonitaetRisikostufe.BackColor = Color.WhiteSmoke
lblBonitaetRisikostufe.ForeColor = Color.Black
End Select