Hallo, kleines aber feines Problem.. wie bekomme ich es hin das wenn ts = 0h 0m 0s in ein anderes Unterprogramm springt? was frage ich am besten ab ? hier der code...
1 | Private Sub Frühstückspause() |
2 | Dim timeNow As Date = Date.Now |
3 | Dim nextPause As Date = Date.Parse(My.Computer.Clock.LocalTime.Date & " 00:12") |
4 | Dim tS As TimeSpan = timeNow - nextPause |
5 | |
6 | If Label3.Text = ("0h 0m 0s") Then |
7 | |
8 | Stop |
9 | |
10 | End If |
11 | |
12 | Label3.Text = "nächste Pause: " & String.Concat(tS.Hours.ToString(), "h ", tS.Minutes.ToString(), "m " & tS.Seconds.ToString(), "s") |