This commit is contained in:
2020-06-22 13:33:07 +02:00
parent f4e823ec69
commit 9b52ab1b61
43 changed files with 1985 additions and 250 deletions

View File

@@ -37,7 +37,8 @@
' Me.KundenSDLTableAdapter.Fill(bindingSDL.bindingdataTable, KdNr, sdlNr)
setCbo(bindingSDL.bindingdataTable.Rows(0).Item("Sperre").ToString)
DS_sperreOLD = DirectCast(ComboBox1.SelectedItem, VERAG_PROG_ALLGEMEIN.MyListItem).Value
If IsDate(TextBox1.Text) Then DS_sperreDatOLD = CDate(TextBox1.Text)
TextBox1.Text = bindingSDL.bindingdataTable.Rows(0).Item("Sperrdatum").ToString
If IsDate(TextBox1.Text) Then DS_sperreDatOLD = CDate(TextBox1.Text) ' : MsgBox("sperre: " & DS_sperreDatOLD)
DateTimePicker1.Checked = bindingSDL.bindingdataTable.Rows(0).Item("Antragsdatum").ToString <> ""
If DateTimePicker1.Checked Then