From 4ffae61bfbd3649d080f275bb6685a10aec98513 Mon Sep 17 00:00:00 2001
From: "d.breimaier" <d.breimaier@verag.ag>
Date: Thu, 19 Sep 2024 13:53:40 +0200
Subject: [PATCH] merge

---
 initATLASAufschubkonten/frmStartOptions.Designer.vb | 4 ++--
 initATLASAufschubkonten/frmStartOptions.vb          | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/initATLASAufschubkonten/frmStartOptions.Designer.vb b/initATLASAufschubkonten/frmStartOptions.Designer.vb
index 8de3db4..ff61cf9 100644
--- a/initATLASAufschubkonten/frmStartOptions.Designer.vb
+++ b/initATLASAufschubkonten/frmStartOptions.Designer.vb
@@ -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)
diff --git a/initATLASAufschubkonten/frmStartOptions.vb b/initATLASAufschubkonten/frmStartOptions.vb
index 838b780..3085714 100644
--- a/initATLASAufschubkonten/frmStartOptions.vb
+++ b/initATLASAufschubkonten/frmStartOptions.vb
@@ -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