This commit is contained in:
2023-08-23 17:37:15 +02:00
2 changed files with 7 additions and 5 deletions

View File

@@ -630,14 +630,15 @@ Public Class frmEintragAviso
End If
End If
If CDate(dtpAvisoEingangDatum.Value) > Now Then
MsgBox("Aviso-Datum darf nicht in der Zukunft liegen!", vbInformation)
dtpAvisoEingangDatum.Focus()
Exit Sub
End If
If optAvisoEingang.Checked Then
If CDate(dtpAvisoEingangDatum.Value) > Now Then
MsgBox("Aviso-Datum darf nicht in der Zukunft liegen!", vbInformation)
dtpAvisoEingangDatum.Focus()
Exit Sub
End If
If dtpAvisoEingangZeit.Value.Hour = 0 And dtpAvisoEingangZeit.Value.Minute = 0 Then
' MsgBox("Bitte eine gültige Uhrzeit bei Aviso-Eingang eingegeben (00:00 ist nicht erlaubt).", vbInformation)
lblErr_Uhrzeit.Visible = True

View File

@@ -866,6 +866,7 @@ Partial Class usrcntlAktDetailsATILLANeu
Me.Button12.Name = "Button12"
Me.Button12.Size = New System.Drawing.Size(75, 23)
Me.Button12.TabIndex = 0
Me.Button12.Visible = False
'
'Button8
'