This commit is contained in:
2024-09-19 13:53:40 +02:00
parent 55cd7909d4
commit 4ffae61bfb
2 changed files with 3 additions and 3 deletions

View File

@@ -3955,7 +3955,7 @@ Public Class frmStartOptions
Private Sub Button18_Click(sender As Object, e As EventArgs) Handles Button18.Click
Dim abDatum = Nothing
If MyTextBox4._value <> "" Then abDatum = CDate(MyTextBox4._value)
'If MyTextBox4._value <> "" Then abDatum = CDate(MyTextBox4._value)
doAASVermerke_Schwelle(abDatum)
End Sub