在VB中将日期转换为小时答案

【问题标题】：Converting Date to hours in VB在VB中将日期转换为小时
【发布时间】：2014-07-25 11:36:39
【问题描述】：

如何将日期计算为小时？例如，我想计算在July 23 to the current date(July 25 in our country). 期间过去了多少小时

这样输出：

Total Hours past: 48 Hours

【问题讨论】：

您也关心时间部分还是只关心日期？即时间会有所不同，具体取决于您将当前日期时间与 7 月 23 日的时间进行比较
TimeSpan 会给你分钟、小时、毫秒，无论你想看到什么How to format a TimeSpan object in .NET
@shree.pat18 其实都是，谢谢指出。
@shree.pat18 真的可以将天转换为小时吗？
@Plutonix 我正在尝试计算两个日期之间的间隔，然后将答案转换为小时。

标签： vb.net datetime computation

【解决方案1】：

我怀疑还有更多隐藏在表面之下的事情，比如如何将日期写入代码。如果某个日期来自另一个国家/地区，您必须考虑到这一点。没有代码很难更清楚。

Dim thisDate As DateTime = #2/10/2010#
Dim thatDate As DateTime = #10/21/2013#

Dim ts1 As TimeSpan = thatDate.Subtract(thisDate)
' or:
' Dim ts1 As TimeSpan = thatDate - thisDate
Console.WriteLine("{0} Days or {1} hours have passed", 
        ts1.TotalDays, ts1.TotalHours)

输出：

1349 Days or 32376 hours have passed

【讨论】：

抱歉没有显示任何代码我在另一个工作站的代码中
天数可以不四舍五入就换算成小时吗？
天、小时、秒、毫秒、年、月、时钟滴答——所有这些都已经为您计算好了
我的意思是输出有可能变成小时吗？抱歉，我对 vb 不熟悉。
什么是“成为小时”？时间跨度告诉您两个日期之间的时间跨度（以各种增量方式）。如果日期相隔 2 天，则为 48 小时

【解决方案2】：

Private Sub days_calc_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
    Dim d1 As Date = "24/07/2014" ' From date
    Dim d2 As Date = "24/08/2014" ' To date
    MsgBox("Date difference in days : " & (d2 - d1).TotalDays & "Days")
    MsgBox("Date difference in hours : " & (d2 - d1).TotalHours & "Hours")
    MsgBox("Date difference in minutes : " & (d2 - d1).TotalMinutes & "Minutes")
End Sub

【讨论】：

可以换算成小时吗？