将时间戳转换为半小时

Question

我正在编写一个函数，使用Visual Studio 2010将时间转换为最接近的半小时。 例如，15：23至15:30，如果15:05，它将转换为15:00。

有人有想法吗？提前谢谢。

Answer 1

您可以使用此方法：

Public Enum eRoundingDirection
    up
    down
    nearest
End Enum

Public Shared Function RoundDateTime(dt As DateTime, minutes As Integer, direction As eRoundingDirection) As DateTime
    Dim t As TimeSpan
    Select Case direction
        Case eRoundingDirection.up
            t = (dt.Subtract(DateTime.MinValue)).Add(New TimeSpan(0, minutes, 0))
        Case eRoundingDirection.down
            t = (dt.Subtract(DateTime.MinValue))
        Case Else
            t = (dt.Subtract(DateTime.MinValue)).Add(New TimeSpan(0, minutes \ 2, 0))
    End Select

    Return DateTime.MinValue.Add(New TimeSpan(0, (CInt(t.TotalMinutes) \ minutes) * minutes, 0))
End Function

将当前时间四舍五入到最近的半小时：

Dim rounded = RoundDateTime(Date.Now, 30, eRoundingDirection.nearest):

最初找到（在C＃中）here

Answer 2

查看此答案how to round time 这是一个javascript示例，但vb.net应该可以实现。