vb.net - 如何使用 vb.net 获取一年中的总小时数？

Question

我想使用 VB.Net 获取一年中的总小时数。有什么方法或功能可以帮助我们实现吗？

我想得到这样的东西:

Private Function GetTotalHours(ByVal year As String) As String
    Dim time As String = String.Empty
    Try
         ' Calculate here...

    Catch ex As Exception

    End Try        
    Return time
End Function

像这样使用它:

TextBox1.Text = GetTotalHours('2008')   ' Result will be = 8784
TextBox1.Text = GetTotalHours('2013')   ' Result will be = 8760

Answer 1

你可以使用这个:

Public Function GetTotalHours(ByVal year As Integer) As Integer
    Dim dtAux As New Date(year, 1, 1)
    Dim ts As TimeSpan = dtAux.AddYears(1) - dtAux

    Return CInt(ts.TotalHours)
End Function