Hey.
Ich habe folgende Funktion, um herauszufinden, ob eine Zeit zwischen Zwei Zeiten liegt.
Diese klappt soweit auch, aber bei z.B. Startzeit 23:00 und Endzeit 08:00 und einer jetzigen Uhrzeit von 00:10, gibt die Funktion false aus.
Die Zeit liegt aber ja zwischen den beiden Zeiten. Bei einer Startzeit von 00:00 und den gleichen anderen Werten gibt sie True aus..
Irgendeine Idee wieso? Oder eine bessere Funktion?
Danke
Mfg.
Ich habe folgende Funktion, um herauszufinden, ob eine Zeit zwischen Zwei Zeiten liegt.
Diese klappt soweit auch, aber bei z.B. Startzeit 23:00 und Endzeit 08:00 und einer jetzigen Uhrzeit von 00:10, gibt die Funktion false aus.
Die Zeit liegt aber ja zwischen den beiden Zeiten. Bei einer Startzeit von 00:00 und den gleichen anderen Werten gibt sie True aus..
VB.NET-Quellcode
- Function IsInTime(ByVal StartTime As String, ByVal StopTime As String) As Boolean
- Dim StartS As String = StartTime
- Dim StopS As String = StopTime
- Dim StartTimeA As String() = StartS.Split(New Char() {":"})
- Dim StoPTimeA As String() = StopS.Split(New Char() {":"})
- Dim current As DateTime = DateTime.Now
- Dim currentHr As Integer = current.Hour
- Dim currentMin As Integer = current.Minute
- Dim NewHr As String = String.Format("{0:0#}", currentHr)
- Dim NewMin As String = String.Format("{0:0#}", currentMin)
- If (DateTime.Now.TimeOfDay >= New TimeSpan(StartTimeA(0), StartTimeA(1), 0) AndAlso DateTime.Now.TimeOfDay <= New TimeSpan(StoPTimeA(0), StoPTimeA(1), 0) = True) Then
- Return True
- Else
- Return False
- End If
- End Function
Irgendeine Idee wieso? Oder eine bessere Funktion?
Danke
Mfg.