This commit is contained in:
2021-09-07 08:46:12 +02:00
parent f2f992547d
commit 619a8c26bf
126 changed files with 7156 additions and 2215 deletions

View File

@@ -465,8 +465,13 @@ Public Class usrCntlKundenuebersicht
' TMPText = TMPText.Replace("/ ", "" & vbNewLine)
' TMPText = TMPText.Replace("/", "" & vbNewLine)
rtbAbf_Besonderheiten.Text = TMPText
lblKreditlimit.Text = checkNullNbr(KUNDE.Kreditlimit).ToString("N", CultureInfo.CurrentCulture)
lblKreditlimit.BackColor = Color.White
lblKreditlimit.Text = checkNullNbr(KUNDE.Kreditlimit).ToString("N", CultureInfo.CurrentCulture)
If KUNDE.Kreditlimit <> 0 And KUNDE.Kreditlimit <> 2600 Then
lblKreditlimit.BackColor = Color.Yellow
End If
If KUNDE.Kreditlimit = 0 Then lblKreditlimit.Text = ""
'lblAviso.Font = f_norm
'lblNeutralisierung.Font = f_norm