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

@@ -842,8 +842,8 @@ Partial Class frmStartOptions
'
'TabPage1
'
Me.TabPage1.Controls.Add(Me.Label41)
Me.TabPage1.Controls.Add(Me.MyTextBox4)
'Me.TabPage1.Controls.Add(Me.Label41)
'Me.TabPage1.Controls.Add(Me.MyTextBox4)
Me.TabPage1.Controls.Add(Me.LinkLabel99)
Me.TabPage1.Controls.Add(Me.PictureBox99)
Me.TabPage1.Controls.Add(Me.Button99)

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