edv/ADMIN
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

merge

Browse Source
This commit is contained in:
d.breimaier
2024-09-19 13:53:40 +02:00
parent 55cd7909d4
commit 4ffae61bfb
2 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
initATLASAufschubkonten/frmStartOptions.Designer.vb generated
View File

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

2
initATLASAufschubkonten/frmStartOptions.vb
View File

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