Hallo,
heute stehe ich mal wieder vor einem Problem, wo ich ned schlau werde.
Vielleicht kann mit einer helfen, oder erklären... was das für ein "Gedöns" ist:
Habe zwei DateTimePicker auf Zeit mit Costum-Forma: "HH:mm" über Designer auf Form.
Eingegeben wird z. B. 08:00 und 24:00 Uhr
Das 24 Uhr nimmt er nicht an und wir müssen immer 23:59 angeben... was für ein Mist.
Geben wir 0:00 an, nimmt er es zwar an, aber dann funktioniert meine "Zeitrechnung" nicht mehr...
Mein Test-Code:
Wie löst Ihr das Problem ??
Gruß Michl
EDIT:
zum Test mal versucht mit MakTextBox zu arbeiten ... aber des war kei g'scheide Idee, weil's immer noch ned funktioniert.
Letztends wird wohl am DateTime/Berechnung liegen.
Hab aber keine Idee wie i des anders machen könnt.
Der Text-Stümper-Code:
heute stehe ich mal wieder vor einem Problem, wo ich ned schlau werde.
Vielleicht kann mit einer helfen, oder erklären... was das für ein "Gedöns" ist:
Habe zwei DateTimePicker auf Zeit mit Costum-Forma: "HH:mm" über Designer auf Form.
Eingegeben wird z. B. 08:00 und 24:00 Uhr
Das 24 Uhr nimmt er nicht an und wir müssen immer 23:59 angeben... was für ein Mist.
Geben wir 0:00 an, nimmt er es zwar an, aber dann funktioniert meine "Zeitrechnung" nicht mehr...
Mein Test-Code:
VB.NET-Quellcode
- Dim _t1 As New TimeSpan(DateTime.Parse(BelegReiseziel_VONDateTimePicker.Value).TimeOfDay.Ticks)
- Dim _t2 As New TimeSpan(DateTime.Parse(BelegReiseziel_BISDateTimePicker.Value).TimeOfDay.Ticks)
- Dim _eT As String = _t2.Subtract(_t1).ToString
- Dim _eTzahl As Double = convertTimeSpanToDouble(_eT)
- lbl_reisedauer.Text = _eTzahl & " Std."
Wie löst Ihr das Problem ??
Gruß Michl
EDIT:
zum Test mal versucht mit MakTextBox zu arbeiten ... aber des war kei g'scheide Idee, weil's immer noch ned funktioniert.
Letztends wird wohl am DateTime/Berechnung liegen.
Hab aber keine Idee wie i des anders machen könnt.
Der Text-Stümper-Code:
VB.NET-Quellcode
- Dim _t1 As DateTime
- Dim _t2 As DateTime
- Try
- _t1 = DateTime.Parse(Now.ToString("dd/MM/yyyy ") & BelegReiseziel_VONMaskedTextBox.Text)
- _t2 = DateTime.Parse(Now.ToString("dd/MM/yyyy ") & BelegReiseziel_BISMaskedTextBox.Text)
- Catch ex As Exception
- MsgBox(ex.message)
- Exit Sub
- End Try
- Dim _eT As String = _t2.Subtract(_t1).ToString
- Dim _eTzahl As Double = convertTimeSpanToDouble(_eT)
- lbl_reisedauer.Text = _eTzahl & " Std."
Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „michl75“ ()