Hi,
beim durchstöbern des Internets nach Methoden zum runden von Uhrzeiten und Datümern bin ich nur auf einige recht hilflose Versuche zu runden gestoßen, da wurde das mit Abfragen geregelt.
Deshalb möchte ich hier meine Methode vorstellen:
Wobei ich nicht so ganz kapiere, warum die VB.Net Sprachentwickler diesen flotten 3 Zeiler nicht in der math.Round Funktion untergebracht haben.
Für Kommentare und weitere Anregungen wäre ich dankbar.
Axel
beim durchstöbern des Internets nach Methoden zum runden von Uhrzeiten und Datümern bin ich nur auf einige recht hilflose Versuche zu runden gestoßen, da wurde das mit Abfragen geregelt.
Deshalb möchte ich hier meine Methode vorstellen:
VB.NET-Quellcode
- Public Enum RoundType As Long
- Days = TimeSpan.TicksPerDay
- Hours = TimeSpan.TicksPerHour
- Minutes = TimeSpan.TicksPerMinute
- Seconds = TimeSpan.TicksPerSecond
- End Enum
- Private Function Round(dt As DateTime, value%, toround As RoundType) As DateTime
- Dim roundit = value * toround
- Dim ticks = CLng(Math.Floor((dt.Ticks / roundit + 0.5)) * roundit)
- Return New DateTime(ticks)
- End Function
Wobei ich nicht so ganz kapiere, warum die VB.Net Sprachentwickler diesen flotten 3 Zeiler nicht in der math.Round Funktion untergebracht haben.
Für Kommentare und weitere Anregungen wäre ich dankbar.
Axel
Bitje voor Bitje Kwaliteit
Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „Axel“ ()