rename NULL placeholder to $Null

This commit is contained in:
Jonathan Jenne 2020-07-30 10:29:22 +02:00
parent d4852043ad
commit 33fa89bae9
2 changed files with 2 additions and 2 deletions

View File

@ -374,7 +374,7 @@ Public Class ClassControls
} }
} }
If Vorgabe.ToUpper = "NULL" Then If Vorgabe.ToUpper = "$NULL" Then
oPicker.EditValue = Nothing oPicker.EditValue = Nothing
ElseIf Vorgabe IsNot Nothing Then ElseIf Vorgabe IsNot Nothing Then
oPicker.EditValue = Vorgabe oPicker.EditValue = Vorgabe

View File

@ -1314,7 +1314,7 @@ Public Class frmAdministration
Case 5 : oValue = "$DateDDMMYYY" Case 5 : oValue = "$DateDDMMYYY"
Case 6 : oValue = "$Username" Case 6 : oValue = "$Username"
Case 7 : oValue = "$Usercode" Case 7 : oValue = "$Usercode"
Case 8 : oValue = "NULL" Case 8 : oValue = "$Null"
End Select End Select
DEFAULT_VALUETextBox.Text = oValue DEFAULT_VALUETextBox.Text = oValue